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1.0 GENERAL INFORMATION 
1.1 PROGRAM ABSTRACT 


THIS IS _A LSI-11 RESIDENT ete a WHICH CHECKS oy FUNCTIONALITY 

OF A_ TSVOS MAGTAPE SUBSYSTEM WHILE CONNECTED TO A LSI- 41¢9 syste" 
(Gpus >, THE PROGRAM PROVIDES, ERROR MESSAGES WHICH IDENTIFY FAILING 
UNCTIONS THAT AID IN THE REPAIR OF THE DEVICE. THIS DIAGNOSTIC CONSIST OF 
ELEVEN TEST WHICH ARE EXECUTED IN SEQUENCE. 


THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
RUNTIME SERVICE SUPERVISOR). THESE SERVICES PROVIDE 
THE INTERFACE T SOFTWARE ENVI 

THIS APER 
TAPE. FOR A COMPLETE SeSCRIPTION TON OF The RUNTIME SERVICES, REFER 
TO THE XXDP+ USER'S MANUAL. THERE IS A BRIEF DESCRIPTION OF 

THE RUNTIME SERVICES IN SECTION 2 oF THIS : 

1.2 SYSTEM REQUIREMENTS 

LSI-11 PROCESSOR AND MEMORY 

CAUTION: DIAGNOSTIC REQUIRES 32K WORDS OF MEMORY 

(26K USEABLE I.€. 4K FOR 1/0 PAGE) 

TSVOS MAGTAPE SUBSYSTEM (DRIVE AND CONTROLLER) 

CONSOLE TERMINAL 

POP-11 DIAGNOSTIC SUPERVISOR (HSAAA.SYS VERSION 34 OR LATER) 
POP-11 DIAGNOSTIC LOADER/MONITOR (XXDP-) 

1.3 RELATED DOCUMENTS AND STANDARDS 

DIGITAL EQUIPMENT CORPORATION DOCUMENTS: 


1. CHQUS XXDP- USERS GUIDE; DOCUMENT NUMBER AC-F348E-MC 
DATE: 14 ALY 1960. 


2. TSVOS TRANSPORT SUBSYSTEM USER'S GUIDE; DOCUMENT NUMBER EK-TSVOS-UG-001 
DATE: AUGUST 19635 


3. TSVOS TRANSPORT SUBSYSTEM TECHNICAL MANUAL; DOCUMENT NUMBER EK-TSVOS-TM-001 
DATE: AUGUST 19835 


4. TSVOS TRANSPORT SUBSYSTEM INSTALLATION MANUAL; DOCUMENT NUMBER EK-TSVOS-IN-001 
DATE: AUGUST 19635 

1.4 DIAGNOSTIC HIERARCY PREREQUISITES 

AE Steg LSI-11 Coane. PROCESSOR AND MEMORY 


— fT 
FUNCTIONAL TANDALONE DIAGNOSTIC ISOR 
FUNCT AGNOSTIC LOADER/MONITOR (XXDP-) 
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1.5 ASSUMPTIONS 
ALL mT ON Fie ty” ig UNDER TEST IS ASSUMED TO WORK 
Ree brite eS ERRORS CANOE RECORTEDY <n qncuat GOOD Reet 


2.0 OPERATING INSTRUCTIONS 


THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES. 
FOR DETAILED INFORMATION, REFER TO THE XXDP+ USER'S MANUAL (CHQUS). 


2.1 COMMANDS 


THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC ore SERVICES 
CSUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP- USER’S MANUAL HAS MORE DETAILS. 


FROM AN INITIAL grave 
WITHOUT INITIALIZ 
x | sepnentions CAFTER tC) 


TURN TO XXDP+ MONITOR (XXDP- OPERATION ONLY!) 
ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE 
CONSIDERED ze BE ACTIVE AT START TIME 
DEACTIVATE A 
PRINT Ne DIAGNOSTIC = INFORMATION A SY IMPLEMENTED 


SECTION 

TYPE A A LIST OF ALL inet oe TNF ORMAT ION 

TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3) 
CLEAR ALL FLAGS (SEE SECTION 2.3) 


A COMMAND CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. SO 
YOU MAY, FOR EXAMPLE, TYPE “STA” INSTEAD OF “START”. 


2.1.1 OPERATOR COMMANDS 


THE TSVOS DIAGNOSTIC IS A LSI-11 DIAGNOSTIC SUPERVISOR COMPATIBLE 
PROGRAM ALL LOADING AND RUNTIME INSTRUCTIONS CAN BE REFERENCED IN THE 
CHQUS XXDP- USERS GUIDE,DOCUMENT NUMER AC-F348E-MC. THE USER ENTRY IS IN QUOTES. 


BOOT THE DIAGNOSTIC MEDIA 


.R VTSA?? 

DIAG a Tit SERVICES REV D. APR 79 
cooe eee fb oere DIAGNOSTICeses 
UNIT IS TSVOS 


>O0R 





oe 
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2.2 SWITCHES 


SEVERAL SWITCHES WHICH ARE USED TO MODIFY pee he eo ae 


THERE ARE 

THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS. ALL OF T 

SWITCHES ARE TABULATED ae WITH A BRIEF DESCRIPTION OF EACH. 

IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY “DDDDD’. 


/TESTS:LIST EXECUTE ONLY THOSE TESTS SPECIFIED IN 
THE LIST. LIST IS A STRING OF TEST 
EXAMPLE - ZTESTS:1:5;7- 10. 
THIS tiét WILL CAUSE Tests 1 1,5,7,8,9,10 TO 
BE RUN. ALL OTHER TESTS MILL NOT BE RUN, 
/PASS : DDDDD EXECUTE DDDDD PASSES ae “at b 0 64000 
/FLAGS:FLGS SET SPECIFIED FLAGS. FLAGS DESCRI 


IN aPC 2.3. 
7EOP : DDDDD P 
DODDD passes ° 1 
/UNITS:LIST TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED 
IN THE LIST. LIST EXAMPLE - /UNITS:0:5:10-12 
USE UNITS 0,5,10,11,12 CUNIT NUMBERS = 0-63) 
EXAMPLE OF SWITCH USAGE: 
START/TESTS: 1-S/PASS: 1000/E0P : 100 


THE EFFECT OF THIS COMMAND WILL BE: 2. TESTS 1 THROUGH 5 WILL BE 
EXECUTED x? ALL UNITS WILL Me 2 1000 TIMES AND 3) THE END OF 


S WILL BE PRINTED AFTER Y. A 
SUETCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. YOU MAY, 
FOR EXAMPLE, TYPE “/TES:1-S" INSTEAD OF “/TESTS:1-5". 


aS IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH > 


TESTS PASS FLAGS EOP UNITS 


START x Kx x x x 
RESTART xX x x x x 
CONTI x . x 

DROP x 
ADD x 
PRINT 

DISPLAY 

FLAGS 

ZFLAGS 


SEQ 0005 


Gi 
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2.3 FLAGS 


FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET ee THE FLAGS SWITCH. FLAGS 

ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR 

ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS, 
NO COMMANDS AFFECT THE STATE OF THE ne THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 


FLAG EFFECT 

HOE HALT ON ERROR - CONTROL IS RETURNED TO 
RUNTIME SERVICES COMMAND MODE 

LOE LOOP ON ERROR 

TER® INHIBIT ALL ERROR REPORTS 

TBR INHIBIT ALL ERROR REPORTS EXCEPT 
FIRST LEVEL (FIRST LEVEL CONT AINS 

T NUMBER, PC, TEST AND UNIT) 

IXE* NHIBIT EXTENDED ERROR THOSE 
CALLED BY PRINTX MACRO 

PRI DIRECT MESSAGES TO LINE PRINTER 

PNT PRINT TEST NUMBER AS TEST EXECUTES 

BOE “BELL” ON ERROR 

UAM UNATTENDED MODE (NO MANUAL INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 
APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT 
STATISTICAL REPORTING) 

IOR INHIBIT AM DROPPING OF UNITS 

ADR EXECUTE AUTODROP CODE 

LOT LOOP ON TEST 


*ERROR MESSAGES ARE DESCRIBED IN SECTION 3.1 


SEE THE XXDP+ USER'S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY 
MORE THAN ONE FLAG WITH THE FLAG SUITCH, FOR EXAMPLE, 

TO CAUSE THE PROGRAM TO LOOP ON ERROR IT REPORTS 

AND TYPE A “BELL” ON ERROR, YOU MAY USE THE FOLLOWING STRING: 


/FLAGS :LOE: IER: BOE 


SEQ 0006 


Hi 
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2.4 HARDWARE QUESTIONS 
WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT 
HARDWARE I NF OnHA 


THE USER FOR 1b BY TYPING “CHANGE HW (L) ?” 
YOU MUST ANSWER “Y" RETER A T COMMAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN "PRELOADED™= USING THE SETUP UTILITY ary See 
CHAPTER 1 USER’ HIS 


ER 14 OF THE XXDP- WHEN YOU ANSWER 
QUESTION WITH A "Y", THE RUNTIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS CIN DECIMAL). 


AFTER INITIAL STARTING OF THE PROGRAM (START COMMAND TO THE DIAGNOSTIC 
SUPER HE PROGRAM WILL ISSUE THE "CHANGE HW?" QUESTION TO ASK IF 
HE HARDWARE PARAMETERS ARE TO BE CHANGED (BY THE OPERATOR). 


ON A “N" (NO) RESPONSE TO THE “CHANGE HW?” QUESTION, THE ges WILL 
RUN USING THE DEFAULT VALUES FOR ALL QUESTIONS. THE DEFAULT ADDRESS AND VECTOR ARE: 


TSBA/TSOB = 172520, VECTOR = 224 


ON A "Y" CYES) RESPONSE TO THE QUESTION, THE FOLLOWING QUESTIONS WILL 
THEN BE ASKED TO ALLOW THE OPERATOR TO SELECT THE UNITS TO BE TESTED. A 
IF PRESENT, LOCATED TO THE LEFT OF THE QUESTION MARK IS ve 
DEF AULT VALLE THAT WILL BE TAKEN IF ONLY A CARRIAGE RETURN IS TYPED AS A 
RESPONSE. A “(D)" IN A QUESTION INDICATES THAT A DECIMAL NUMBER IS 
REQUIRED AS A_ RESPONSE. “(0)” INDICATES AN OCTAL NUMBER IS BEING 
yy Fan ves. os INDICATES THAT A LOGICAL RESPONSE IS TO BE MADE: 


@ UNITS (D) ? <ENTER THE NUMBER OF M7196 CONTROLLERS 
PRESENT TO BE TESTED> 


UNIT O 


DEVICE ADDRESS (0) 172520 ? <ENTER THE ADDRESS OF THE 
TSBA/TSDB REGISTER> 


VECTOR (0) 224 ? <ENTER ADDRESS OF INTERRUPT 
VECTOR> 


. THE ADDRESS AND VECTOR QUESTIONS WILL BE ASKED FOR EACH OF THE NUMBER OF 
UNITS (CONTROLLERS) SPECIFIED IN THE “® UNITS?” QUESTION. LOGICAL. UNIT 
NUMBERS ARE ASSIGNED IN ORDER, BEGINNING AT 0. UP TO FOUR UNITS CAN BE 
re Ms FOR TESTING AS FOLLOWS: 
UP TO 4 TSVOS CONTROLLERS PER Ls1- 11 AND UP TO 2 DRIVES PER CONTROLLER 


Ii 
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2.5 SOFTWARE QUESTIONS 


AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART 
OR CONTINUE COMMAND, THE RUNTIME SERVICES WILL ASK FOR SOFTWARE 
PARAMETERS. THESE PARAMETERS WILL GOVERN SOME DIAGNOSTIC SPECIFIC 
OPERATION MODES. YOU WILL BE PROMPTED BY “CHANGE SW (L) ?” 

IF YOU_WISH TO CHANGE ANY PARAMETERS, ANSWER BY TYPING 

“Y", THE SOFTWARE QUESTIONS AND THE DEFAULT VALUES ARE DESCRIBED 
IN THE NEXT PARAGRAPH(S). 


THE FOLLOWING QUESTIONS ARE ASKED ON A START RESTART, OR CONTINUE. 
THEY ALLOW FLEXIBILITY IN THE WAY THE PROGRAM BEHAVE 


CHANGE SW (L) ? <TYPE Y TO CAUSE THE FOLLOWING 
QUESTIONS TO BE ASKED> 


INHIBIT ITERATIONS (L) N ? <TYPE “Y" TO PREVENT MULTIPLE 
ITERATIONS OF CERTAIN TESTS. 
THIS CAUSES EACH TEST PASS TO 
RUN AS QUICKLY AS POSSIBLE. 
ONLY QUICK-RUNNING LOGIC 
TESTS USE MULTIPLE 
ITERATIONS. > 


2.6 EXTENDED P-TABLE DIALOGUE 


WHEN YOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES 
IN A_TABLE THAT DESCRIBES DEVICES UNDER TEST. THE SIMPLEST 
WAY TO BUILD THIS TABLE IS TO — ALL QUESTIONS FOR EACH 
_ TO BE TESTED. IF YOU + MUL TIPLEXED a are SUCH AS 

A MASS STORAGE CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION 
DEVICE WITH SEVERAL L Lines. THIS BECOMES TEDIOUS SINCE MOST OF 
THE ANSWERS ARE REPETITIOUS. 


Jl 
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jo DEVICE. “The x A_MORE ine SE THES DEVTEE CONST ty ARE TESTING 


E WITH ETGHT UNI S_CSUB- Pind Y ATTACHED yo IT. 
THESE. UNITS. ARE ARE peScn ieee BY Une OCTAL NUMBERS O THROUGH 7. THERE 
IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG oar CALLED THE 
Q-FACTOR. THIS Q-FACTOR MAY BE O OR 1. er IS A SIMPLE WAY 
TO BUILD A TABLE FOR ONE XY11 WITH EIGHT UNITS. 


@ UNITS (D) 2? 8<CR> 


Tl 
CSR ADDRESS (0) ?_ 160000<CR> 
-DEVICE @ (0) ?. O<CR> 
Q-FACTOR (0) 0 ? 1<CR> 
UNIT 2 
CSR ADDRESS (0) ?_ 160000<CR> 
SUB-DEVICE @ (0) ?_ 1<CR> 
Q-FACTOR (0) 1 ? O<CR> 
UNIT 3 
CSR une (O) ?_ 160000<CR> 
CE @ (0) ? 2<CR> 
Q- PACTOR (0) 0 2? <CR> 


UNIT 4 

CSR ADDRESS (0) ?._ 160000<CR> 
SUB-DEVICE @ 5°? ? 3<CR> 
Q-FACTOR (0) 0 ? <CR> 


UNIT 5 
CSR SS (0) ? 160000<CR> 
UB-DEVICE @ (0) ? 4<CR> 
Q-FACTOR (0) 0 ? <CR> 
UNIT 6 
CSR SS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ? 5<CR> 
Q-FACTOR (0) 0 ? <CR> 
UNIT 7 
CSR ADDRESS (0) ? 160000<CR> 
SUB - 7) $9? a 6<CR> 

< > 


SUB-DEVICE @ (0) 
Q-FACTOR (0) 1 ? <CR> 
NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANGES WHEN 
NON-DEFAULT RESPONSE IS GIVEN. BE CAREFUL WHEN SPECIFYING 
MULTIPLE UNITS! 
AS YOU CAN SEE FROM THE ABOVE EXAMPLE PARAMETERS 


DO _NOT VARY SIGNIFICANTLY FROM UNIT TO UNIT” THE PROCEDURE SHOWN IS 
NOT VERY EFFICIENT. 
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THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS 
oR THE SAME TABLE USING THE MULTIPLE SPECIFICATION 


@ UNITS (D) ? 8<CR> 


OGUE, THE RUNTIME SERVICES WILL 
aeteet pak 


FROM THE FIRST NUMBER TO THE : S CASE, SUB-DEVICES 

2. 3, 4 AND 5 WERE SPECIFIED. DEVICE WERE SPECIFIED 

BY ADDRESSES, THE I T 
ON AN Y 

THE FOUR ENTRIES ARE 


ASSUMED TO BE 160000 AND 0 RE VEL 
SINCE THEY WERE ONL . THE LAST TWO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 


THE WHOLE PROCESS COULD HAVE BEEN ACCOMPLISHED IN ONE PASS AS 
SHOWN BELOW. 
@ UNITS (0D) ? 8<CR> 


UNIT 1 
CSR ADORESS (0) ? 160000<CR> 
SUB-DEVICE @ (0) ?. 0-7<CR> 

Q-FACTOR (0) 0 ? 0,.1.0...+1,1<CR> 


AS YOU CAN SEE FROM THIS EXAMPLE, NULL REPLIES (COMMAS ENCLOSING 
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLY. 
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2.7 QUICK START-UP PROCEDURE (XXDP-) 
TO START-UP THIS PROGRAM: 
1. BOOT XXDP- 
2. TYPE “R NAME”, WHERE NAME IS THE NAME OF THE BIN OR BIC 
FILE FOR THIS PROGRAM 
3. TYPE “START” 
4. ANSWER THE “CHANGE HW” QUESTION WITH “Y” 
S. ANSWER ALL THE HARDWARE QUESTIONS 
6. ANSWER THE “CHANGE SW” QUESTION WITH “N” 
WHEN YOU FO\.LOW THIS sy 9 RY OU WILL BE USING ONLY THE 
DEFAULTS FOlt FLAGS AND SOFTWARE PARAMETERS. THESE DEFAULTS 
ARE DESCRIBED IN SECTIONS 2.3 AND 2.5. 
3.0 ERROR INFORMATION 
3.1 TYPES OF ERROR MESSAGES 
THERE ARE THEE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 
A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES 


ARE ALWAYS PRINTED UNLESS THE “IER” FLAG IS SET (SECTION 2.3). 
THE GENERAL ERROR MESSAGE IS OF THE FORM: 


NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC: XXXXXX 
ERROR MESSAGE 


WHERE; NAME = DIAGNOSTIC NAME 
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT) 
NUMBER = aaa 

UNIT NUMBER = N (N IS LAST UNIT IN PTABLE) 

TST NUMBER = Test AND SUBTEST WHERE ERROR 

PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL 


BASIC ERROR MESSAGES ARE ME S_ THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 
THE “IER* OR “IBR“ FLAGS ARE SET (SECTION 2.3). THESE 

ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 


pape ERROR MESSAGES CONTAIN yeh hal ERROR al 

SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWA 

PRINTED UNLESS THE “IER", “IBR” OR “IXE” FLAGS ARE SET CSECTION 2.3). 
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 





MACRO VOS.03 Tuesdey 26-Apr-87 10:28 Page 13 


3.2 SPECIFIC ERROR MESSAGES 


BELOW ARE SAMPLE ERROR MESSAGES. EACH ERROR MESSAGE REPRESENTS DIFFERENT TYPES 
OF ERRORS DETECTED BY THIS DIAGNOSTIC. 


ERROR MESSAGE EXAMPLE 1 


THIS ERROR IS INDICATIVE OF “ INCORRECT REGISTER OR STATUS WORD RETURNED 
Ld THE DIAGNOSTIC. THE FIRST PART DEFINES THE pest FUNCTION AND UNIT THAT FAILED. 
SECOND PART PRIOVIDES THE REGISTER BITS AND THEIR MNEMONICS FOR THE 
THGORRECT REGISTER OR STATUS WORDS. THE THIRD PART IS THE EXPECTED AND RECEIVED 


TST: 016 FIFO EXERCISER TEST 
HRD ERR 01610 ON UNIT 00 TST 016 SUB 002 PC: 040624 
FIFO STATUS CIN WORD 9) INCORRECT AFTER WRITE FIFO 


IN WORD #6: - DESIGNATOR <BIT @> 
<9> IRDY<6> IRWD<2> 
<6> IONL<S> IFBY<1> 

ISPEED<7> ILOP<4> IFPT<O> 


DATMESe TS Teuces GUTROY SSS INRDY<4> 

<6> <> < 
MESSAGE BUFFER ADDS SS = Oa73SEe 
MESSAGE BUFFER CONTENTS: 


#0 EXPD: 100020 ~ 1 ro s5¢4 
000000 


WORD 
WORD 1 EXPO: 
WORD #2 EXPO: 
WORD 93 ExPD: 

$ 
WORD 95 EXPD: 
WORD #6 EXPD: 
WORD $7 EXPO: 
WORD 96 EXPD: 
WORD #9 EXPD: 


S ERROR SHOWS A FATAL FUNCTION ERROR FROM THE TAPE DRIVE a THIS 
INSTANCE AN geet ERROR OCCURED WHICH — THAT T 
CONTROLLER MAY BE DEFECTIVE. 


a Bete Reem ear 8. TST ono Posen SUB 00S PC: 026202 


Beet weet: ee 
Seay ts 3: See 





Ni 
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ERROR MESSAGE EXAMPLE 3 
THIS ERROR SHOWS THAT THE orion 8 BIT DID NOT GET SET WHILE DOING A 
REWIND WITH EXTENDED FEATURES MODE ENABLED. 


CVTS HRD ERR 00 Met rte wbune (entero F 023306 
MOT BIT cXst0o. NOT SET DURING REWIND (EXTENDED FEATURES MODE ) 
EXPD: 000312 RECV: 000112 XOR: 000200 

4.0 PERFORMANCE AND PROGRESS REPORTS 

AT THE END OF EACH PASS, THE PASS COUNT IS GIVEN ALONG WITH THE 
TOTAL NUMBER OF ERRORS REPORT ". SINCE THE On orien Wi WAS STARTED. 
THE “EOP” SWITCH CAN BE USED T Oe Sone OFTEN THE END 

OF PASS MESSAGE IS PRINTED. SECTI 2 DESCRIBES SWITCHES. 


SUCCESSFUL RUN EXAMPLE (LSI-11) 


DR>STA/FLA:PNT : HOE 

UNITS (0D) ? 1 

UNIT O 

DEVICE ADDRESS (0) 172520 ? <CR> 
VECTOR (0) 224 ? <CR> 

CHANGE SW (L) ? N<CR> 


THE ABOVE COMMAND START THE DIAGNOSTIC. THE HAS TWO 
SUITORS ON MICH “PRINT EACH TEST NBR AS EXECUTED" AND “HALT ON 
TST. 902 GAAP DATA HE SyTE Test 

Tt; 908 trae DATA gos 

TST; 004 RAM 


TST: 00S 7 
Tat, 90? Corea) ect Te 
TST: WRITE est TEST 


TST: VOL “ 
TST: 009 "e3t : 
TST: 010 oco. TEST 

TST: O11 NON-TAPE ION COMMANDS TEST 


NOTE: DS SHOE Wt DURE BRAY WRESS 4 PASS Mermen cara ws oem 
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PROGRAM RUN TIMES 


THE AVERAGE RUN TIMES OF THE PROGRAM ARE LISTED BELOW.THESE FIGURES ARE 
TO BE USED AS A_ GUIDE. THE TIMING WAS DONE ON A LSI-11 
PROCESSOR WITH A LA34 CONSOLE. 


THE PROGRAM RUNS IN ba Png NO ITERATIONS AND DEFAULT MODE. IN THE 
NO Ml ay MODE on rest . Ue» WITH NO ITERATIONS. IN THE 
DEFAULT MODE EACH Test” Is TS REPEATED 6 THE NUMBER OF TIMES INDICATED We 
THE ITERATION COUNT. NO ITERAT TONS MODE IS SELECTED BY ANSWERING T 
INHIBIT ITERATIONS QUESTION WITH A “Y" (YES). 


TEST N/I 
NUMBER SE 


w 
uw 


WONIOU SUH 


10 
il 


THE TIMES REQUIRED TO RUN TESTS 1 THROUGH 12 IN ONE COMMAND: 
1 MIN 57 SECONDS 
12 MINS 


bela -atth bat aaa 
Vik OvuO ae 


Q.V. 
DEF AULT 
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5.0 DEVICE INFORMATION TABLES 


WHENEVER THE PROGRAM IS STARTED, VIA THE Sracet) COMMAND , 
THE —— REQUESTS THE FOLLOWING P-TABLES 


ARAMETER 


CHANGE HW (L) ? 


@ UNITS (0) ? <ENTER THE NUMBER OF M7196 CONTROLLERS 
PRESENT TO BE TESTED> 


UNIT O 


DEVICE ADDRESS (0) 172520 ? <ENTER THE ADDRESS OF THE 
TSBA/TSOB REGISTER> 


VECTOR (0) 224 ? <ENTER ADDRESS OF INTERRUPT 
VECTOR> 


THE ADDRESS AND VECTOR QUESTIONS WILL BE ASKED FOR EACH OF 
UNITS (CONTROLLERS) SPECIFIED IN THE “@ UNITS?” Gus ST ION. 
GNED IN ORDER, BEGINNING TO FOUR 


ATO. WP 
SELECTED FOR TESTING. 


IN ADDITION ON A START, RESTART OR CONTINUE THE SUPERVISOR 
REQUEST 5 oHANeES TO THE SOFTWARE OPERATING PARAMETERS, AS 
ous, 


CHANGE SW (L) ? 


INHIBIT ITERATIONS (L) N ? 
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6.0 TEST SUMMARIES 

TEST 1: BUS RESET TEST 
THIS TEST VERIFIES THAT T STERS ARE 
Scere MOA Lee fel Raetioceti? one BID NOT FIND 
SELF’ TEST SEQUENCE ANE AS FOLLOuS: WROM AND PIPELINE REGISTER 
SEQUENCER, INTERNAL BUSES, 2901 MICROPROCESSOR. | AND 
Test "a heget ins taut ONTROLLER BY” narrine int ous f ate 
SSS bedi: enti Yo'be Yate tort etek 

aac a Bers: raha 


45: He Stookey Poh ae PETS Sete tla OS 
tie ene THE EXPECTED DATA. Ac ACTUAL attitte AND ND Tre te Piedad 


CANY OF BITS 11-14 ARE SET, 

BITS DO NOT CORRE TO THE 

TS_0-S):_ INDICATES THAT THE 
ED. INDICA 


TION. pe; IS A FATAL 
TELO TO 


Ui ah SS a BE 
oe teat 


peace ctor pe ITS_0-5 IS IN 
IS A FATAL THE ERROR 
APPROPRI RIATE DESCRIPTION GIVEN. 





EQ 
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TEST 2: WRAP DATA - HIGH BYTE 
THIS TEST VERIFIES OPERATION OF: 


1. PART THE LSI-1 CTION OF THE 7196 
MODULE FODULE: mat OF eihe wut Iagt tit orto abh, ART 
BYTES) ORY or Te‘ boos ANSCEIVER en cracuits (ADDRESS 
DECODER, BDAL DRIVERS CaGH rere OF INTERNAL DAL BUS 
DRIVERS RS), AND BASIC PROGRAMMED 1/0 CONTROL SEQUENCES 

oe 


PART OF 2901 MICROPROCESSOR ELEMENTS (Q-REGISTER, 
REGISTER 0, ROTATE AND NEGATE FUNCTIONS 


Y AND SOURCE BUSES; 
BASIC MICROPROGRAM SEQUENCES. 


HE PROGRAM ig oe TEST DATA BYTE INTO THE HIGH BYTE OF TSOB, 


ABOVE. THE TEST I 
BYTES (0-377 OCTAL). 






















FO 
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TEST 3: WRAP DATA - LOW BYTE 
THIS TEST FURTHER VERIFIES OPERATION OF MANY OF THE SAME 
ELEMENTS TESTED IN TEST 2, AND ADDITIONALLY VERIFIES: 
1. LOW BYTE OF THE TSDB INPUT FILE REGISTER, 


LOW BYTE OF INTERNAL DAL BUS DRIVERS ON THE DCOOS 
TRANSCEIVER CIRCUITS, 


3. BASIC FUNCTIONING OF PARTS OF THE RAM. 


THE PROGRAM WRITES A_TEST DATA we INTO LOW BYTE OF TSOB 
yh 4 A een IN_TSSR TO SET ee CKS THE CONTENTS 


IF A DISCREPANCY IN DETECTED. 
LISTS LIKELY FAULTY ceoreres FROM THE Loot a dl 
ABOVE. THE TEST IS I 
BYTES (0-377 OCTAL). 
TEST 4: RAM TEST 
ra TEST VERT Te THAT ALL LOCATIONS OF THE R 
TORE READ BACK 


AND 
EACH RAM LOCATION IS UNIQUELY ADDRESSED eS F THA 
3 LOCATION IS ACCESSED BY ANY PARTICUL ADORESS) THE 


ERS 
THE CAPABLITY OF THE 2901 TO CORRECTLY PERFORM 





SEQ 0018 


Ge 
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TEST S: SECOND INITIALIZATION TEST 
THIS TEST VERIFIES THE SAME ELEMENTS AS DID INITIALIZATION TEST 
@1 AND ALSO CHE TS OF 0 ZERO 


AND THAT ER 
THIS IS_A CONFIDENCE CHECK OF A PART OF 
THAT IT IS REALLY BEING EXECUTED). FOR a OF 


(I.E 


I 
EARED TO ZERO. 


: TWO 
SUBTESTS CONE FOR INITIALIZING VIA A 6US INIT OTHER FOR 
in petowes BY WRITING INTO THE TSSR), THE FOLLOWING SEQUENCE 

: 


Be 


EACH RAM LOCATION AND 2901 REGISTERS 10 AND 11 ARE SET 
TO ALL 1’S BY USING WRITES INTO THE TSDB REGISTER (LOW 
BYTE AND MAINTENANCE MODE WORD WRITES). 


THE CONTROLLER IS INITIALIZED AND THE VARIOUS CHECKS ON 
THE TSSR an IN INITIALIZATION TEST #1 ARE 


#1'S (377 OCTAL) ARE WRITTEN INTO THE LOW BYTE OF TSODB, 
WHICH SHOULD CAUSE RAM LOCATION O TO BE WRITTEN TO ALL 
1'S SINCE 2901 REGISTERS 10 AND 11, SPECIFYING THE RAM 
ADDRESS, SHOULD BE 0. RAM LOCATION O IS VERIFIED BY 
WRITING A WORD OF ZEROS INTO THE TSOB. THE RESULTING 
LOW BYTE OF TSBA SHOULD CONTAIN ALL 1’'S. 


THE ENTIRE RAM IS SCANNED. LOCATION O SHOULD CONTAIN 
ALL 1'S AND THE REMAINING Ry SHOULD CONTAIN. FOR THE 


MESSAGE BUFFER IMAGE AREA, SHOULD CONTAIN O. 
DI ANCIES ARE REPORTED. AN ERROR AT THIS POINT IS 
i pe! DUE ay E, A ROM, PIPELINE OR SEQUENCER PROBLEM 


SEQ 0019 


He 
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TEST 6: COMMAND REJECT 


THIS TEST VERIFIES THAT ALL COMMANDS OTHER THAN WRITE 
CHARACTERISTICS oF REJECTED DUE TO THE eae cee 


IN THE Is 
REJECTED. THIS TEST CHECKS MICROPROCESSOR SEQUENCING, BASIC 
OMMAND DECODING AND 


TEST 1 SE WORDS (OTHER 
THAN WRITE CHARACTERISTICS) WITH THE INTERRUPT ENABLE (IE) BIT 
CLEAR AND VERIFIES THAT AN INTERRUPT IS NOT GENERATED BY THE 
REJECTED COMMAND; SUBTEST 2 PERFORMS SIMILARLY TO SUBTEST 1 BUT 
SETS THE IE BIT in EACH COMMAND WORD AND VERIFIES THAT AN 
INTERRUPT IS GENERATED WHEN THE COMMAND IS REJECTED. 


TEST 7: WRITE CHARACTERISTICS 


THIS TEST VERIFIES ae YT OF THE WRITE CHARACTERISTICS 
COMMAND. IT VERIFIES T THE COMMAND BLOCK AND CHARACTERISTICS 
FETCHED PROPERLY FROM Y NEED BUFFER 


PROPERLY, PROPER 
MESSAGE PACKET IS STORED, WHERE APPROPRIATE. THIS TEST DOES NOT 
CHECK THAT THE VARIOUS FUNCTIONS ENABLED BY CHARACTERISTIC MODE 
DATA BITS OPERATE PROPERLY; THE FUNCTIONING OF THESE BITS IS 
VERIFIED IN SUBSE CUTED IN THIS 


GENER HOWEVER, THE PROGRAM RUNS A 
PROCESSOR PRIORITY 0, WITH THE INTERRUPT SERVICE ROUT pe SET "up 
TO FLAG UNEXPECTED INTERRUPTS. IF AN INTERRUPT OCCURS, 

PROBLEM EXISTS IN EITHER THE LSI-11 BUS INTERFACE SECTION OR IN 
THE ROM OR PIPELINE. 


TEST 6: VOLUME CHECK 


THIS TEST VERIFIES THAT THE VOLUME SHECK (VCK) BIT A FLAG HELD 
WITHIN THE M7196 AND Y ANTTIALIZE ZE AND 
EARED BY A eFeetst WITH THE 
CVC BIT SET. IT IS ALSO VERIFIED THAT ;' WRITE CHARACTERISTICS 
COMMAND THE 


WITH THE CVC BIT CLEAR DOES NOT AFFECT THE STATE OF 
VOLUME CHECK BIT. THE ACTUAL FUNCTION OF VOLUME CHECK, THAT OF 
PREVENTING OR ALLOWING ION COMMAND 


DEPENDING UPON 
WHETHER VOLUME CHECK IS SET OR CLEAR, IS NOT CHECKED BY THIS 

TEST; THIS FUNCTIONALITY IS CHECKED IN THE INDIVIDUAL TESTS OF 
TAPE MOTION COMMANDS. 


SEQ 0020 


le 
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TEST 9: COMPLETION INTERRUPT 


THIS TEST VERIFIES THAT AN INTERRUPT IS GENERATED AT THE 
COMPLETION OF THE WRITE CHARACTERISTICS COMMAND IF THE INTERRUPT 
ENABLE (IE) BIT IN THE COMMAND HEADER WORD IS SET. THIS TEST 
CHECKS THE FUNCTIONING os THE INTERRUPT LOGIC AND BASIC 
PROCESSING OF THE IE BIT 


THE SEQUENCES OF TEST 7 ARE REPEATED EXCEPT | THAT THE INTERRUPT 

ROUTINE IS SET UP TO EXPEC T_INTERRUP S AND WR 
SERRA ERISTICS COMMAND IS Cee” WITH THE Te BIT SET (1). IT 
IS VERIFIED WHERE APPROPRIATL WAT He IE STATUS BIT IN XxSTO 
OF ANY ME PACKET IS SET AND THAT A COMPLETION INTERRUPT IS 
GENER . FINALLY, A SEQUENCE OF MTWO COMMANDS ARE TSSUED THE 
FIRST WITH IE=1 AND THE SECOND WITH IE=0. IT IS VERIFIED | Twat 
NO INTERRUPT IS GENERATED AFTER THE SECOND COMMAND AND THAT THE 
IE BIT IN XSTO IS O. 


an8 
it 
— 
m 


TEST 10: BASIC PACKET PROTOCOL 
THIS TEST VERIFIES BASIC OPERATION OF THE MESSAGE BUFFER RELEASE 
Cc FUNCT OMMAND HEADER WORD, 


THE ION OF THE ACK BIT IN THE C 
AND THE REGISTER MODIFICATION REFUSED (RHR) LOGIC. 


TEST 11: NON-TAPE MOTION COMMANDS 
THIS TEST VERIFIES PROPER OPERATION OF THE INITIALIZE 
COMMAND. TWO i ee. ARE USED. THE FIRST venir ae® THAT 
THE COMFAND RUNS TO COMPLETION AND STORES A VALID 


MESSAGE P NON-ZERO 
VALUES IN THE COMMAND MODE FIELD CAUSES COMMAND REJECT. 
7.0 MAINTENANCE HISTORY 


REVISION A - MARCH 1962 


REVISION B - JUNE 1964 
S FOR THE ORION CPU (11/77). 
ELIMINATED THE MESSAGE DESCRIBING THE CPU TYPE. 


REVISION C - APRIL 1967 
Goes = TO ALLOW DIAGNOSTICS TO WORK WITH 


‘OS MICROCODE (REVISION 2). THE NEW 
TSVOS MICROCODE ALWAYS IN EXTENDED FEATURE MODE. 


SEQ@ 0021 
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” mc SEQ 0022 

-TITLE TSV2_- PROGRAM HEADER 

“SBTTL PROGRAM HEADER 

*BSEcT 

\MCALL SVC 

éve ; INITIALIZE SUPERVISOR MACROS 
"ENABLE LC 
"NLIST BEX,CND 
“ENABL ABS, AMA 

002000 *'=2000 
BGNMOD TSV2 


s THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
s THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 
gee 


POINTER BGNSW,BGNSFT BGNAU, BGNDU , BGNRPT 
HEADER CVTSA.C,0,655. 
L$NAME: : 01 RONOSTIC NAME 
103 .ASCII /C/ 
126 [ASCII /V/ 
124 “ASCII /T/ 
123 "ASCII /S/ 
101 [ASCII /A/ 
000 “BYTE 
000 "BYTE 0 
000 "BYTE 0 
LSREV:: ;REVISION LEVEL 
103 .ASCII  /C/ 
L$DEPO: : :0 
060 .ASCII /0/ 
LSUNIT:: sNUMBER OF UNITS 
000000 .WORD 0 
LSTIML:: ;LONGEST TEST TIME 
001217 .WORD 655. 
L$SHPCP: : sPOINTER TO H.W. QUES. 
046004 .WORD LSHARD 
L¢SPCP:: ;POINTER TO S.W. QUES. 
046136 .WORD L¢SOFT 
L¢HPTP: ; ;PTR. TO DEF. H.W. PTABLE 
002154 .WORD L¢HW 
L¢SPTP:; ;PTR. TO S.W. PTABLE 
002164 .WORD L$SW 
LSLADP: ; sDIAG. END ADDRESS 
047004 .WORD LSLAST 
LSSTA::. sRESERVED FOR APT STATS 
000000 .WORD 0 
L$Co:: 
000000 .WORD 0 
LSDTYP:; sDIAGNOSTIC TYPE 
000000 .WORD 0 
LSAPT:; ;APT EXPANSION 
000000 WORD 0 


L¢DTP:: © ;PTR. TO DISPATCH TABLE 
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L#DISPATCH 
sDIAGNOSTIC RUN PRIORITY 


iFLAGS DESCRIBE HOW IT WAS SETUP 
sEXPANSION WORD 
SVC REV AND EDIT @ 

ISION 


sDIAG. EVENT FLAGS 


s POINTER TO DEVICE TYPE LIST 
sPTR. TO REPORT CODE 


sPTR. TO ADD UNIT CODE 

sPTR. TO DROP UNIT CODE 

sLUN FOR EXERCISERS TO FILL 
sPOINTER TO DIAG. DESCRIPTION 
sGENERATE SPECIAL AUTOLOAD EMT 
sPOINTER TO ERRTBL 

sPTR. TO INIT CODE 

sPTR. TO CLEAN-UP CODE 

sPTR. TO AUTO CODE 

sPTR. TO PROTECT TABLE 

sTEST NUMBER 

sDELAY COUNT 

sPTR. TO HIGH MEM 


. WORD 
"WORD 
WORD 

. WORD 
. WORD 
. WORD 
. WORD 
. ORD 
. WORD 
. WORD 
* WORD 


LSPRT:: 
L¢TEST:: 
LSOLY:: 
LSHIME: :" 


SE555555 





Le 


TSV2 - PROGRAM HEADER MACRO VOS.03 Tuesday 26-Apr-87 10:28 Page 25 


-SBTTL DISPATCH TABLE 


} THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 
} IT IS USED BY THE SUPERVISOR TO DISPATCH 10 EACH TEST. 
gece 


DISPATCH 1 
LSDISPATCH: 


-SBTTL DEFAULT HARDWARE P-TABLE 


°e 


THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 
: THE TEST-DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
s IS IDENTICAL TO THE STRUCTURE OF THE RUN-TIME P-TABLE. 


gee 

BGNHW 86 OF PTBL sDEFAULT HARD-P-TABLE 
-WORD 1L10000-L$HW/2 

LSHW:: 

OFPTBL:: 


a7gse0 : 1ST ke 2 wine 
PRIO4 ; INTERRUPT PRIORITY. 





Me 
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SOFTWARE P-TABLE 
-SBTTL SOFTWARE P-TABLE 


; THE SOFTWARE P-TABLE CONTAINS THE VALUES OF THE PROGRAM 
s PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR. 


SFPTBL 
L10001-L $SW/2 


TRANSTST: : E TEST OF ote IF #1 
NOITS:: WORD 


LERRMAX: : 
GERRMAX: : 
L10001: 

ENDMOD 
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SOFTWARE P-TABLE 
7 -TITLE TSV3 - ARE 
8 -SBTTL GLOBAL TES SECTION 
19 
TSV3 
-SBTTL GLOBAL EQUATES SECTION 


THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
ARE USED IN MORE THAN ONE TEST. 


s GET STANDARD EQUATES. 


100000 
40000 
20000 
10000 
4000 
2000 
= 1000 
400 
200 
100 
40 
20 
= 10 
4 
e 
i 
TOS 


a4 


a td 
SERSLSE 





TSV3 - GLOBAL AREAS 
GLOBAL EQUATES SECTION 
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34 002174 
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; OPERATOR FLAG BITS 


EVL== 4 


LOT== 10 
20 


40000 
HOE== 100000 
KT11 : 

.SBTTL MEMORY MANAGEMENT DEFINITIONS 
3#KT11 VECTOR ADDRESS 
*KT11 STATUS REGISTER ADDRESSES 

= 177572 
SRl= 177574 
sre 177576 
SR3= 172516 


-IF NB 
s#USER "I" PAGE DESCRIPTOR REGISTERS 
UIPDRO= 177600 


sDEFINE MEMORY MANAGEMENT REGISTERS 


SEQ 0027 
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MEMORY MANAGEMENT DEFINITIONS 
_ ISTERS 
77 cae ADDRESS REG 
177646 
77646 
177650 
1776 
776 
177656 
IF NB 


s8USER "D" PAGE ADDRESS REGISTERS 
UDPARO= 177660 


"I" PAGE DESCRIPTOR REGISTERS 
IPORO= 172200 


IF NB 
Sebabe ties “D* PAGE DESCRIPTOR REGISTERS 


PAGE ADDRESS REGISTERS 


PAGE ADDRESS REGISTERS 
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MEMORY MANAGEMENT DEFINITIONS 

AR4= 172270 

ARS= 173378 


SOPARG= 172274 
SOPAR7T= 172276 


;eKERNEL "I" PAGE DESCRIPTOR REGISTERS 
PORO= 172300 


+7533 
cfppes 11a 


172316 ei 172316 


PAGE 
"DESCRIPTOR "REGISTERS 


740 ADORESS REGISTERS 
72342 


ane- 179878 
KDeART- 172376 
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TSVOS REGISTER AND PACKET DEFINITIONS 


5+ 4 -SBTTL TSVOS REGISTER AND PACKET DEFINITIONS 


41 3 
3 3: SOME GENERAL EQUATES. 
rt : 


4s TO ERROR VECTOR FOR BUS TIME OUT. 


ERRVEC== s POINTER 
TTIVEC== 60 s INTERRUPT se te COMOL FOR ones INPUT 
TTICSR== s BUS ADDRESS I 
TTIBFR== s CONSOLE INPUT DATA BUFFER 
BOVPCR== s BOV11 PAGE CONTROL REGISTER 

te 

sBIT DEFINITIONS FOR TSSR REGISTER 


SPECIAL CONDITION 
}BUS INTERFACE ERROR 
ERROR 


T10 
B113 !'eITé6 
B1T7 


BIT6 BIT 
PaTERR= BIT4:681TS tPATAL ices cones ERROR CODES 
TERCLS= BITS!GIT2:BIT1 ; TERMINATION CODES 


PALER S SEK A LUNE SSS Ss 


8¢ 


i8IT DEFINITIONS FOR EXTENDED STATUS REGISTER 0 
3(XSTO) 
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TSVOS REGISTER AND PACKET DEFINITIONS 


i817 DEFINITIONS FOR EXTENDED STATUS REGISTER 1 
petiend 

Xi. OLT = BIT15 Ore LATE 

X%1.SPARE= BIT14 


X1.COR = BIT13 4 a ey E_DATA ERROR 
X1.MBZ = BIT1>-BIT11-Br 10-61 PoOE LT OTIS -OT 1S -BE14-BITS-BE12-8IT0 sALWAYS O 
= BITS READ BUS PARITY ERROR 


X1.RBP 8 
X1.UNC = BIT1 sUNCORRECTABLE DATA OR HARD ERROR 
i8IT DEFINITIONS FOR EXTENDED STATUS REGISTER 2 

(xsT2) 

ce s grti3 F IN PROGRESS (TAPE MOVING) 


AM 
af SPARE= BEE ernizsenftr oP Scat sNOT USED BY TSVOS (CALWAYS=0) 
. + N= EXTENDED Ore PERTIMe BY reece 
3 


2 EATURE: 

= BIT6 4 

= 77 3sIF WRIT THEN = MI 1S 

e BIT2-BIT1-BITO. sIF GET STATUS THEN = CURRENTLY SELECTED UNIT NO. 


M . tateeticnmens FOR EXTENDED STATUS REGISTER 5 


IMGT USED DIAGNOSTIC ERROR CODE 
My TSVOS 
ON INCOMPLETE 


REVERSE 
i TRANSPORT RESPONSE FAILURE 
sDENSITY CHECK 


Hie BRE 


1811 DEFINITIONS FOR EXTENDED STATUS REGISTER 4 
:HIGH SPEED 
4 ad 


B1T13 4 RANSPOR Feo ohio rope 
oo er so-te activ count por wero ALWAYS O 


}TSSR TERMINATION CODES (BIT 0-2) 

é 

t- 
TSREJ= 302 COMMAND REJECTED 
UNREC= 6 JUNRECOVERABLE ERROR 
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TSVOS REGISTER AND PACKET DEFINITIONS 


147 se 
48 
+3 }DEVICE REGISTER OFFSETS 


sTSOB/TSBA REGISTER 

Tec Reel REGISTER HIGH BYTE 
REGISTER 

Teer REGISTER HIGH BYTE 


s TSDB ADDRESS BIT DEFINITIONS 
Ainie = BIT1-BITO sADDRESS BITS 17:16 ARE IN 1:0 


: “COMMAND DEFINITIONS 
sGET STATUS 
s INITIALIZE 
sCONTROL COMMANDS 
eh tl 
sPOSITION 
1SUBSYSTEM WRITE 


RITE CHARACTERISTICS 
sREAD 


id 
} COMMAND PACKET HEADER WORD BIT DEFINITIONS 
t- 
sBUEFER AVAIL FOR CONTROLLER 
ee VOLUME 
QUENCE OF DATA BITS 
SWAP BYTES IN MEMORY 
= Bitii:exr10r6r+9:6 178 4EXTENDED COMMAND MODE FIELD 


Ie ENABLE 
-FMT= BIT6!BITS SPACKET HEADER TYPE CALWAYS=0) 
co = 37 MAJOR COMMAND FIELD 


VVvvvvvy 


sRELEASE BUFFER 
REWIND 


+NO-OP 
}REWIND IMMEDIATE INTERRUPT 
SECURITY ERASE 





H3 
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SEQ 0033 
TSVOS REGISTER AND PACKET DEFINITIONS 

198 3° 
199 } CONTROLLER RAM DEFINITIONS 
300 5 
501 000167 RMCHBEG = 167 :CHARACTERISTICS IO DATA BEGIN RAM ADDRESS 
S02 000200 = 200 \CHARACTERISTICS 10 DATA END RAM ADDRESS 
503 000201 RMPKTBEG= 201 iCOMPAND PACKET BEGIN RAM ADDRESS 
504 000210 RMPKTEND= 210 }COMMAND P RAH SS 
505 000215 RMMSGBEG= 215 MESSAGE BUFFER BEGIN RAM ADDRESS 
206 000234 RMMSGEND= 234 }MESSAGE BUFFER END RAM ADDRESS 

| iad 
508 
208 }REGISTER DEFINITIONS IN THE MESSAGE BUFFER 
zi 
513 000006 XSTO== 6 EXTENDED STATUS REGISTER © (WORD 4) 
514 000010 XSTl== 8. EXTENDED STATUS REGISTER 1 (WORD 5) 
515 000012 XST2== 10, EXTENDED STATUS REGISTER 2 (WORD 6) 
516 000014 XST3== 12. EXTENDED STATUS REGISTER $3 (WORD 7) 
217 000016 XST4e= 14. EXTENDED STATUS REGISTER 4 (WORD 8) 
221 {OFFSETS TO WORD LOCATIONS IN PACKET DEFINITIONS 
238 ; 
595 000002 PKLOW = 2 LOW ORDER CHARACTERISTIC DATA POINTER 
556 000004 PKHI : 4 }HIGH ORDER CHARACTERISTIC DATA POINTER 
227 000006 PKBCNT + 6 }NUMBER OF BYTES IN DATA PACKET 
229 000010 EXBCNT=10 ;NUMBER OF BYTES IN EXTENDED DATA PACKET 
531 : 
232 }DATA PACKET OFFSETS FOR WRITE SUBSYTEM COMMAND 
53a 000000 ' BSELO «0 BYTE 0 
535 000001 BSEL1 = 1 ‘BYTE 1 
536 000002 Sid = 2 SWORD 2 
337 000004 SELDATA = 4 ;WORD 3 
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TSVOS REGISTER AND PACKET DEFINITIONS 


}BSELO SELECT CODES FOR WRITE SUBSYSTEM COMMAND 


La) nd aed Ad ad 
BUNNELE we ounne 


1 AND 13 
AD EXT. TAPE STATUS (NOT SVPPORTED BY ALL TRANSPORTS 


FORMATTER ADDRESS 


349 
241 
$45 
ea 
245 
246 
247 
248 
249 
250 
251 
252 
253 
254 
255 
256 
257 
258 
259 
260 
261 
262 
263 
264 


REVERSE 
WRITE FILE MARK 
EDIT \ 


ERASE \ 
SIRESVS - RESERVED 03 
1IRESV4 - RESERVED 04 % 


MISCELLANEOUS SUBCOMMAND \ 


s INVERT SENSE OF exTpeee a gh? SWITCH 
sRESET tue AND INPUT PARITY ERRORR 
BITS sRESET TAPE STATUS os 2 FLIP-FLOPS 
BIT2:B1IT1 S ATTENTION TRIGGER FIEL 
BITO sRESET TIMER A,B THEN DELAY TIMES IN SEL2 
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31 


Roosesausaccssessaboee 


MACRO VOS.03 T 8- -87 : P 33 
vesday 28-Apr 10:26 Page SEQ 0035 


; MS. ATTN SUBCODES 
ge 


MSA.NOP = O#2 sNO-OP (NOTHING TRIGGERED) 
MSA.VOL = l#*2 s SIMULATE or og LINE TRANSISTION 
MSA.NRAM= 2e2 sFORCE NON-FATAL RAM ERROR (FORCES ERRCODE 54) 
MSA.FRAM= 32 ;FORCE FATAL RAM ERROR (CAUSES SCE TO SET) 

| 

s WRITE SUBSYSTEM WRITE NPR BSEL1 BIT DEFINITIONS 

t- 

NP .IR = BIT7 s INTERRUPT REQUEST (0-1 TRANSITION) 

NP. OUT = BIT6 i TAPE DATA DIRECTION OUT (0O= IN) 

NP .LOOP = BITS sENABLE TRANSPORT LOOPBACK 

NP. = BIT4 sWRITE CORRECT PARITY (SET=0 TO WRITE WRONG) 

| ad 

s READ STATUS MESSAGE BUFFER BIT DEFINITIONS 

t- 

S2.D0IM = BIT7 sWORD #9 BYTE 2 DATA IN MISS 

S2.ILwW = BIT6 ’ ILW H 

S2.QUTRDY = BITS ‘ OUT ROY H 

S2.INRDY = BIT4 3 IN ROY H 

S2.ATIMR = BITS ’ TIMER A FLAG H 

S2.BTIMR = BIT2 ’ TIMER B FLAG H 

Se. = BIT1-BITO s CUNDEF INED ) 

$1.PARIN * BITIS sWORD #6 BYTE 1 PARIN H 

$1.I2RESV = BIT14 : IRESV2 

$1.I1RESV = BIT135 ’ IRESV1 

$1.IEOT = BITi2 ’ IEOT L 

$1. IIDENT * BITi1 ’ II H 

$1.ICER = BIT10 ; ICER H 

$1. IF MK = BITS : IFMK H 

$1.IHER = BITS ’ IHER H 

SO. ISPEED = BIT7 sWORD 96 BYTE O ISPEED H 

S$O.IRDY = BIT6 ’ IRDY L 

SO. IONL = BITS ‘ IONL L 

SO. ILDP = BIT4 ‘ ILDP L 

$0. IDBY = BITS ’ IOBY L 

SO. IRWD = BIT2 ’ IRWO L 

SO.IFBY = BIT1 ’ IFBY L 

SO.IFPT = BITO ’ IFPT L 


K3 
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SEQ 0036 
SBTTL SPECIAL MACROS AND OPDEFS. 
SAVE GENERAL REGS 1 TO S 


. MACRO VREG 
JSR »REGSAV 
ENDM 


; MACRO TO FORCE AN ERROR~ 
ge 


: FORCERROR TAG ,NOTSSR 

"NLIST 

-TIF NOF LISTALL, .MLIST . 

IF 8 NOTSSR = 
MOV TSSRC(RS),R1 ;READ TS 


- ENDC 
MOV FORCER,FORCER ;IS FORCER SET EAVE C BIT ALONE) 
BNE TAG s8R IF YES 


-NLIST = 
-IIF NDF LISTALL, .LIST 
-LIST 


: * MACRO TO FORCE AN EXIT TO AVOID SECTION ITERATIONS 
3 WILL EXIT TO A LABEL IF FORCER IS NEGATIVE 
‘ So TO F ae AS EXSY Gls ERAN SET 
; FORCER TO 177777 
: TO FORCE ERRORS AND ITERATIONS SET FORCER TO 1. 
5 
FORCEXIT TAG 
-MLIS 
-TIF_NOF LISTALL, .NLIST 
-LIST 


FORCER,FORCER ;IS FORCER NEGATIVE? 
TAG sBR IF YES 


MIST 

“TIF NOF LISTALL, .LIST 

“LIST 

} MACRO TO INCREMENT ERROR COUNTS 

. NEXT. ERRNO 

"MLIST 

+31-TIF NOF LISTALL, .MLIST 
ERRNO= 


ERRNO-1 
604 .35F NDF LISTALL, .LIST 
wi ST 


ae 


TSV3S - GLOBAL AREAS MACRO VOS.03 Tuesday 26-Apr-87 10:26 Page 35 
SPECIAL MACROS AND OPDEFS. 


{MACRO TO PERFORM XOR 
i 


EN=0 INITIALIZE ERROR NUMBER 
“SBTTL FORCER - FORCE ERROR FLAG 


THE FOLLOWING LOCATIONS MAY BE PATCHED BY THE USER 
TO OBTAIN THE RESULTS DESCRIBED FOR EACH. 


= Bare St eehee tent AN 
. JUST ASSUME AND TYPE THE MESSAGE. 


388 
389 
390 
391 
398 
394 
395 
396 
397 
398 
399 
400 
401 
402 
403 
404 
405 
406 
407 
408 
409 


0 s_FORCE TYPE ALL HARD ERRORS (THE ONES CALLED - 
’ ERROR NEED NOT 
‘ 
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GLOBAL DATA SECTION 
-SBTTL GLOBAL DATA SECTION 


: THE CA. A yl gE CONTAINS DATA THAT ARE USED 
sIN MORE T TEST. 


R 
4 


=" 
wn 
4 


cs) 
8 


DEVICE 
rae aot) Oe DETECTED IN IN TEST 


S SOFTWARE SW O=OPF 51*0N 


RAM DATA SIZE FOR PRAMPKT ROUTINE 
CEIVED BUFFER HIGH ADDRESS 


eae oe LOW ADDRESS 
: iTES PATTERN 


iTEST eg A be 


ROUTINE. TEMP 
EXPECTED MESSAGE BUFFER DATA 
sRECEIVED MESSAGE BUFFER DATA 
sTEMPORARY STORAGE FOR PRINT 


a 
- 
000000004 000000000000 pRooCo Hy 


WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
. WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
-BLKW 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
. WORD 
-BLKB 
BLKB 
BLKB 


*’ * 
ond 
s 





NS 
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TSTBLK - TEST DATA TABLE 
SBTTL TSTBLK - TEST DATA TABLE 

%¢ 
ITHIS TABLE CONTAINS TEST DATA USED IN SEVERAL TESTS 
HIN SEQUENCE THE DATA IS: 

ALL ZEROS 

ALL ONES 

WALKING ONES 

WALKING 

ALTERNATING ONES AND ZEROS 


sALL ZEROS 
sALL ONES 
sDATA FOR WALKING ONES 


sDATA FOR WALKING ZEROS 


WAT TERNATING ONES, ZERO OPPOSITE FROM ABOVE 


RRRSR ee sasesesess8 
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GLOBAL ENVIRONMENT STORAGE 
508 .SBTTL GLOBAL ENVIRONMENT STORAGE 
STORAGE FOR DEVICE REGISTERS 
bunny ; 9.100000 ;DUMMY DEVICE REGISTERS... 
0,0,0,0, 8° 8° 0,0 
..FOR MULTI-UNIT CHECKOUT. 


s“DROPPED UNIT” FLAG. 
}INHIBITS CODE IN “CLEAN-UP”. 
sFLAG TO SAY NO DEVICE. 


sSOME TEMP LOCATIONS. 


sXXDP+ COMM BLOCK POINTER. 
eae" FRIZE_MEMORY ADDRESS... 


.. .AND SIZE CIN WORDS). 
sLAST wor” in REE SPACE 


KT1 TER AVAIL FLAG - 
i . AORD © = <24K OR NO KT - 

WZ = >24K AND KT. 
"SET BY TEST ROUTINES TO FLAG >28K UNDER TEST 
:SET IF WE CAN TEST CLEARED OTHERWISE 
3NXM LO ADORESS BITS 
NXM HI ADDRESS BITS FOR DAL'S 16-21 


DUFLG:: 
NODEV: : 
TEMP1:: 
TEMP2:: 
XXCOMM: : 
FREE:: 
FRESIZ:: 
FREEHI: 
KTFLG:: 


*+ oO 
o ocooo co SO * 


S585 SSSS05800083 8 55583 5 


err: 


t 
OCK ADDRESS FOR 32K START 


SACTUAL DATA 
sEXPECTED DATA 


sCONFIGURATION TABLES. 
sCONFIG WORK. 


'oooo ooCco°o 


~ 


000000 
177777 sEND OF MEM TABLE. 
R STATISTICS TABLE (1 WORD PER UNIT), 64 UNITS MAX: 
UNIT NOT TESTED 

100000 UNIT ONL 
1OXXXX XXXX ERRORS 
160000 ICE REGISTER 
160001 ART 

14XXXX ENCOUNTERED XXXX ERRORS 


Sted 


s1*SKIP SUBTEST O=NO SKIP OF SUBTEST 
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SBTTL GLOBAL TEXT MESSAGES 
} THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
1 HESSAGES. AND ASCII INFORMATION THAT ARE USED IN 


NAMES OF DEVICES SUPPORTED 
: DEVTYP <TSVOS> 


LSOVTYP:: 
-ASCIZ /TSVOS/ 
EVEN 


TEST DESCRIPTION 

thie: DESCRIPT <eeee TSVOS LOGIC DIAGNOSTIC - REPLACE M7196 IF ERROR eeee> 
** ASCIZ /eeee TSVOS LOGIC DIAGNOSTIC - REPLACE M7196 IF ERROR ees, 

{BIT TO ASCII CONVERSION FOR TSSR REGISTER 


+Ssrert: : 1$,2¢,3$,4$,5¢,6$,7%,88 
9$.108,11¢,12¢,134,148,15$,16% 


oo 
babe 
as 
— “Oo - *es 


ata 
sar 
“se 


4 
a 


*BIT1' 

‘BITO’ 

*TSSR ERROR AFTER T T’ 

+ TSeR ERROR AFTER BUS RESET” 

4 _NON-EXISTANT DEVICE REGISTER/ 


806/ 
IEA TSBATTSSR EXP'D: SOGSA, SO6AN/ 
725A TSBA,TSSR REC'D: S068A,806/ 


BE RREEERSHS 


~ 
i 
o 


4 cT 
/ Item MPT EXPECTED, KOT RECEIVED 


/ ERRUPT WAS GENERATED/ 
é ne INTER FAULT/ 


/@A CPU PC: SO068A TSBA: #06/ 


grrecpeeee 
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GLOBAL TEXT MESSAGES 
634 004335 - INIT“ 'T T / 
os ; “BUS- INIT“ DION’ T INITIALIZE CONTROLLER 


“SOFT-INIT“ DION'T INITIALIZE THE DPU/ 
"BUS-RESET” DION’'T INITIALIZE THE DPU/ 


EXP'D: SO068A, REC'D: #06/ 
EXP’D: SO6ENSA REC'D: SOBA, #06/ 
WR TEN TO: S068A REGCR) READ; EXP'D: s068A, REC'D: #06/ 
Do Pecket Sent’ 


ER/ 


est Eaire DATA 
NSA eeeee NO NXM ADDRESS-- 
SNSA eeesesesesesesess 11/2 SYSTEM seeeeccesseessesesN’ 
SNSA seeceesessesesess 11/238 SYSTEM eesseseeseseseseosN’ 


GLOBAL ERROR REPORT SECTION 
ERROR REPORT SECTION CONT THE PRINTB AND PRINTX 
ARE IN MORE THAN ONE TEST. 
s ASCII TEXT STRINGS ARE FOUND IN THE GLOBAL TEXT SECTION. 


oad sNON-EXISTANT DEVICE REGISTER. 


s PRINT EXTENSION IF REQUIRED. 


L10002: 
TRAP 


; THIS ROUTINE APPENDS A UNIQUE EXTENSION CIF REQUIRED) 
s TO ANY OF THE ABOVE ERROR SIGNATURES. 


éxteno: TST (PC). 
EXTA: : © = NO EXTENSION. 


$ 
JSR Be. @EXTA s APPEND EXTENSION TEXT. 
1$: pant ONUL ; PRINT A BLANK LINE 


Ste 


$PNTX 
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PRITSSR - PRINT TSSR CONTENTS 
.SBTTL PRITSSR - PRINT TSSR CONTENTS 
‘ 
SROUTINE TO DISPLAY THE CONTENTS, AND BIT DEFINITIONS, OF 
iTHE TSSR REGISTER. THIS ROUTINE IS NORMALLY CALLED ONLY 
IBY A MESSAGE PRINTING ROUTINE 
LINPUTS: 
; Ri CONTENTS OF TSSR 
;SUBORDINATE ROUTINES: 


CHKAMB CHECK FOR AMBIGUOUS CONTENTS 


sSAVE GENERAL REGISTERS 
sSAVE THE TSSR_ CONTENTS 
sPRINT THE CONTENTS OF TSSR 


” R1,R4 
INTB STESRFOR, Ra 
Ra -(SP) 


3 
if 
é 


3 
é 

ER 

ozesa 


w 
rS 


* SA 
HOV 
HOV 
MOV 
HOV 
ADO 
MOV 
JSR 
acs 
PRINTX @AMBT 
MOV 
MOV 
HOV 


« 
D 
% 


SR SShPResesanss 


sMOVE a TS 
. OMMA TO TERMINATE 
TO NEXT DESCRIPTION 
ate we BITS 


= 
w 
= 


s235° 


s TERMINATE LINE 
@ R 1PRI THE BI DEFINITIONS 
elosher wtb 
@TSSDEF , -( SP 





F4 
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SEQ 0044 
PRITSSR - PRINT TSSR CONTENTS 


006170 012746 000002 
006174 0106 com 
006176 10441 
ae 006200 062706 000006 AOD 
75) Ooeses 9as708 177762 ere, oe rer to 
$ 
722 006212 016303 7 MOV RS). 1GET THE teebobare ea) MEANING 
723 006216 PRINTX ;PRINT THE TERMINATI 
006216 010346 MOV "ys 
006220 012746 006476 MOV FielSe -(SP) 
012746 MOV SP} 
006230 01 MOV 
006232 104415 TRAP Fo 
006234 062706 000006 ADD SP 
724 006240 010403 MOV R4‘R3 sTSSR CONTENTS AGAIN 
725 006242 042703 177717 BIC @rCFATERR,RS ;CLEAR ALL FATAL TERMINATION 
726 006246 001416 BEG 238 ;00N’T PRINT IF ZERO 
727 006250 006203 3 
728 906203 ASR R3 
729 00620 ASR R3 sALINE TERMINATION CODE FOR INDEX 
730 006256 016303 007236 MOV TSECOOCRS -R3 =; GET THe FATAL TERMINATION CODE 
731 006262 PRINTX TF R ;PRINT THE FATAL TERMINATION CODE 
006262 010346 MOV R3,-(SP) 
006264 012746 006537 MOV @TFCASC, -(SP) 
006270 012746 000002 MOV 62.-(SP) 
006274 O01 MOV SP > RO 
76 104415 TRAP CSPNTX 
006 062706 000006 ADO 66, SP 
732 006 042704 176377 25: Bic Ot CHIADOR ,R4 :CLEAR ALL BUT EXTENDED ADORESS 
733 006310 001411 BEO 30% :00N'T PRINT IF ZERO 
734 006312 PRINTX #@TEXASC,R4 ;PRINT THE EXTENDED ADDRESS BITS 
006312 01 MOV R4 36) 
006314 012746 006435 MOV OTEX -(SP) 
012746 000002 MOV €2.-(SP) 
010600 MOV SP‘ RO 
006326 104415 TRAP CSPNTX 
006330 062706 000006 86, SP 
735 006334 013703 002176 30$: MOV EPRTSW,RS sPRINT MEAASGE BUFFER ADDRESS 
PRINTX R3 :PRINT PROPER MESSAGE 
006340 010346 MOV RS. - (SP) 
006342 012746 000001 MOV #}. SP 
006346 010600 MOV RO 
006350 104415 TRAP C4PNTX 
006352 706 000004 ADO 64,SP 
737 006356 000207 RTS PC ;RETURN TO CALLER 


G4 
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SEQ 0045 
PRITSSR - PRINT TSSR CONTENTS 


fat 836388 045 116 045 EPRIT: -ASCIZ ‘SNSA eeeeeREPLACE M7196eee00' 
goss 045 (iT : SNSA T , 


04 116 - ° SSR = 

738 os oe rr 043 TExXAse: “ASEH ' ssNSA Extended Address Bits = rt 

0064 : ‘ ‘SNSA Termi ion ess = : 
759 006537 04 116 04 TECASE: ASETS ‘SNA Fetal Termination Cless Code = sT' 
760 006606 045 116 045 TSSDEF: -ASCIZ ‘sSNA TSSR Bite Set: sT' 
rei 006635 045 116 045 AMBTSSR: -ASCIZ ‘sSNA TSSR Contents Are Ambiguous’ 
764 00671 116 1s : -ASCIZ ‘Normel Termination’ 
765 00674 124 145 162 $f: 4g ‘Termination ition’ 

00676 124 141 160 Z ‘Tepe Stetus Alert’ 
767 007011 106 165 4$: IZ ‘Function Reject : 
768 007031 122 145 143 S$: I (° reble Error - Tape Position One Record Down’ 
769 007113 122 145 143 6%: " IZ ‘Recoverable Error - Tape Wes Not Moved’ 
770 007162 125 156 162 7%: " IZ ‘Unrecoverable Error’ 
at 106 141 164 8%: ‘ IZ ‘Fetel Controller Error’ 
773 


z 
g 
# 
g 
é 
g 
§ 
: 
& 
g 
SAAR SRARAAAR 


1%,2¢,3%,4% 
007246 111 1 : Z ‘Internal Diagnostic Failure’ 
776 007302 122 145 163 24: Z ‘Reserved’ ‘ 
777 007313 102 165 163 34: “ Z ‘Bus Interface or Sanity Check Error’ 
As 7 122 145 163 4%: . Z ‘Reserved’ 


H4 
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SEQ 0046 
PRIPKT - PRINT THE ADDRESS/CONTENTS OF COMMAND PACKET 
781 .SBTTL PRIPKT - PRINT THE ADDRESS/CONTENTS OF COMMAND PACKET 
783 3° 
784 sTHIS ROUTINE PRINTS THE ADDRESS AND CONTENTS OF A COMMAND PACKET. 
785 ;THIS ROUTINE IS NORMALLY ONLY CALLED FROM A PRINT ROUTINE. 
t 
762 s INPUT: 
: 
789 : RO NUMBER OF WORDS IN PACKET 
790 : R3 HIGH ORDER COMMAND PACKET ADDRESS 
791 : R4 ADDRESS OF COMMAND PACKET 
> 
138 ' NOTE: R3 IS IGNORED IF THE KTENABLE FLAG IS CLEAR. 
g= 
795 
796 007370 PRIPKT: : 
797 007370 SAVREG ;SAVE THE REGISTERS 
798 007374 010005 MOV RO,RS sSAVE NO. OF WORDS IN PACKET 
799 007376 005737 003134 TST KTENABLE sABOVE 28K UNDER TEST? 
800 007402 001001 BNE 10% :BR IF YES 
801 007404 3 CLR R3 3SET HIGH ORDER ADDRESS TO 0 
007406 010301 10$: MOV R3,R1 sCOPY HIGH ORDER 
803 007410 010400 MOV R4:RO ;GET LOWER ADDRESS 
007412 1 ROL RO ;SHIFT BIT 15 INTO C BIT 
805 007414 006101 ROL R1 ;AND INTO HIGH ORDER. 
007416 PRINTB #@PKTADD,R1,R4  ;PRINT PACKET ADDRESS 
907416 MOV RA, -( SP) 
007. 010146 MOV R1,-(SP 
007422 012746 007554 MOV @PKTADD, -(SP) 
7 012746 000003 MOV #3. -(SP) 
007432 01 MOV SP 
007434 104414 TRAP C$PNTB 
007436 062706 000010 ADD $10 SP 
807 007442 010300 15¢: MOV RO :GET HIGH ORDER ADDRESS 
808 007444 001404 BEQ 20% :8R IF NOT ABOVE 28K. 
809 007446 010401 MOV R4,R1 1GET LOW ORDER ADDRESS 
810 007450 004737 017376 JSR PC, SETMAP ;SETUP PAR6 MAPPING FOR 18 BIT ADDRESS 
gi 007454 010004 MOV RO.R 1GET RETURNED PAR6 ADDRESS BIAS 
0074 20: CLR R1 sSAVE WORD NUMBER 
813 007460 012402 25% MOV (R4)+,R2 sGET PACKET CONTENTS 
814 007462 PRINTB @PKTFRM,R1.R2  ;PRINT THE DATA 
007. 01 MOV R2,-(SP) 
007464 010146 MOV R1,-(SP) 
007466 012746 007516 MOV OPKTFRM, -(SP) 
007472 012746 000003 MOV €3,-(SP) 
007476 01 MOV RO 
104414 TRAP CSPNTB 
062706 000010 ADD #10,SP 
005201 INC 1 : NUMBER 
816 007510 020105 cre RL RS DONE ALL PACKET WORDS? 
002 : DONE 
Bis OOvsia Oo0LeT Bis 82 OO URN 


619 
820 007516 045 116 045 PKTFRM: .ASCIZ ‘SNA Packet Word @sD1SA = #06’ 
ess 00 045 116 045 PKTADD: a ‘SNA Packet Address = #0105’ 


14 


TSV3 - GLOBAL AREAS 


PRIBXOR - PRINT EXPD, RECV AND XOR BYTE 


a 


672 


00 
007670 
007672 


007674 


7750 
007760 


010203 
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177400 


007674 
000004 
000012 


116 


045 


iPR 


. SBTTL 


PRIBXOR - PRINT EXPD, RECV AND XOR BYTE 


PRINT EXPECTED DATA, RECEIVED DATA, AND XOR OF THE DATA BYTE 
rTHIS ROUTINE IS NORMALLY CALLED ONLY FOR PRINT ROUTINES. 


FINPUTS: 


XORBFOR : 


te 


S332 


BI 

BI 

BIC 
PRINTB 


358586 


TRAP 


38 


RTS 


3 


. SBTTL 


EXPECTED DATA 
XOR OF EXPECTED/RECEIVED DATA 


sSAVE THE REGISTERS 
ATA 


R2,R3 sEXPECTED 

R1.R3 ;FORM THE EXCLUSIVE OR 

@t0<377>,RO iBY TE 

RO.R1 1SAVE LOW BYTE RECY 
Re ;SAVE LOW BYTE EXPD 

SAVE LOW BYTE XOR 

xORBEOR, .R2,R1,R3 ;PRINT THE MESSAGE 

Ri’ fap 

Soneron (SP) 

gan tsP) 

SP;RO 

cs 

$12 

R3,RO sRO HAS XOR ON RETURN 

PC ;RETURN TO CALLER 


-ASCIZ ‘sSNA EXPD: SO38A RECV: #038A XOR: #03’ 
PRIXOR - PRINT EXPD, RECV AND XOR 


{PRINT EXPECTED DATA, RECEIVED DATA, AND XOR OF THE TWO 
;THIS ROUTINE IS NORMALLY CALLED ONLY FOR PRINT ROUTINES. 


SINPUTS: 


Ri 
Re 
RO 
G 
PRINTB 


RECEIVED DATA 
EXPECTED DATA 


XOR OF EXPECTED/RECEIVED DATA 


R2.R3 tEXPECTED DATA. > 
R1,R Se ae OR 
OXORFOR,R2,R1, rs’ PRINT THE MESSAGE 


SEQ 0047 


J4 
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PRIXOR - PRINT EXPD, RECV AND XOR 


102 : 
007766 012746 010012 
000004 


873 01 

874 010010 
875 

876 010012 045 116 
877 


MOV R3,-(SP) 
MOV R1,-CSP) 
MOV Re, -(SP) 


MOV RO 
TRAP CePNTB 

Mv R3,RO sRO HAS XOR ON RETURN 
RTS PC ;RETURN TO CALLER 


045 XORFOR: .ASCIZ ‘sNSA EXPD: #068A RECV: 068A XOR: #06’ 


SEQ 0046 


IKK4 


TSV3 - GLOBAL AREAS MACRO VOS.03 Tuesday 28-Apr-87 10:28 Page 44 
PRIEQU - PRINT BIT NUMBERS AS ASCII EQUIVALENT 
-SBTTL PRIEQU - PRINT BIT NUMBERS AS ASCII EQUIVALENT 
| iad 


}ROUTINE TO CONVERT BIT VALUES TO ASCII AND PRINT THE STRING 
sTHIS ROUTINE IS NORMALLY CALLED FROM A PRINT ROUTINE 


}INPUTS: 


; RO OCTAL VALUE TO CONVERT 
Ri TABLE OF POINTERS TO ASCII EQUIVALENT 


vs) 


SSSR aEoeSesesasesess 


sSAVE THE REGISTERS 
sRETURN TO CALLER 


-SBTTL PRIRAM - PRINT RAM ADDRESS 
| hd 


PRINT CONTROLLER RAM ADDRESS. 
iTHIS ROUTINE IS NORMALLY CALLED ONLY FROM PRINT ROUTINES. 


LINPUTS: 
: R4 RAM ADORESS 
H 


PRIRAM: 


010114 
3 010116 045 RAMFOR: .ASCIZ ‘siNSA CONTROLLER RAM ADDRESS = #06’ 





L4 
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PRIADD - PRINT MEMORY ERROR ADDRESS 


916 .SBTTL PRIADD - PRINT MEMORY ERROR ADDRESS 
3¢ 
918 
939 iPRINT MEMORY ADDRESS 
920 iTHIS ROUTINE IS NORMALLY CALLED ONLY FROM PRINT ROUTINES. 


’ 
IMPLICIT INPUTS 
923 


- HIGH ORDER ADDRESS 
ERRLO - LOW ORDER ADDRESS 


3 


sSAVE R1-RS UNTIL NEXT RETURN 
sGET HIGH ADDRESSS 

sGET LOW ADDRESS 

sCOPY LOW ADDRESS 

sSHIFT BIT 15 TO C BIT 

sSHIFT INTO HIGH ORDER 

sPRINT MEMORY ADDRESS IN ERROR 


sais thik 


A832 
- 


35 


-SBTTL PRITADD - PRINT MEMORY TEST ADDRESS 
8° 


PRINT MEMORY ADDRESS 
THIS ROUTINE IS NORMALLY CALLED ONLY FROM PRINT ROUTINES. 
IMPLICIT INPUTS 


- HIGH ORDER ADDRESS 
- LOW ORDER ADDRESS 


r 
8 


sSAVE toe UNTIL NEXT RETURN 
GET HIGH ADDRESSS 





M4 
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PRITADD - PRINT MEMORY TEST ADDRESS 


sPRINT MEMORY ADDRESS HIGH IN ERROR 


sRETURN 


O45 PRITO: .ASCIZ ‘SNA MEMORY TEST ADDRESS LOW = #06’ 
045 PRIT1: .ASCIZ ‘sNSA MEMORY TEST ADDRESS HIGH = #06‘ 
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SPACE - SPACE RECORDS (FORWARD AND REVERSE) COMMAND 
\SBTTL SPACE - SPACE RECORDS (FORWARD AND REVERSE) COMMAND 
sia 
SROUTINE TO ISSUE A SPACE RECORDS 
SCOMMAND (FORWARD OR REVERSE) 


arte OF RECORDS TO BE SPACED OVER 
aie ae OIRECTION 


Gitte = @ 2 comme 


RS FIRST DEVICE UNIBUS ADDRESS 
REQUIRES A WRITE CHARACTERISTICS DONE PREVIOUSLY 
OUTPUT: 


CARRY SET - SPACE RECORDS COMMAND OK 
CLR - SPACE RECORDS FAILED 


961 


75 

77 
979 
980 
388 
984 
965 
986 
987 
389 
990 
991 
38 
9934 
36 
997 
996 
999 
000 
001 


RO THE CONTENTS OF R4 IS MOVED TO RO 


IMPLICIT OUTPUT: 
TAPE HAS BEEN MOVED 
SIDE EFFECTS: 


000764 010660 #500. , SDELAY 
140010 010650 9140010,608 
Eso 
sus 
Sit 


Seseeessss 
ee 
: 
4 
z a 


010652 


be he 

vs 

=- 
meen 


oi be 


CPC) 
50GLY.CPED- 


me ‘oand 
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SPACE - SPACE RECORDS (FORWARD AND REVERSE) COMMAND 
DEC 


;BUMP DELAY COUNTER DOWN 
3BR, IF MORE DELAY 
60$ :8R IF TROUBLE CARRY = CLEAR 
TSSR(RS),R1 ;READ TSSR 
sSET UP EXPECTED 
2 Ri rane TPeQUAL © OK 
t 
60$ 3 TROUBL 


E ExIT 
1SET CARRY NO TROUBLE 
i CARRY CLEAR = ERROR 


R4,RO sPASS PACKET ADDRESS 
PC sRETURN 


BE eas hi 


2 
4 
wn 


PACKET FOR SPACE COMMAND 


-*¢,10>€177770 
oorrwno wor 
$; . WORD 
{ASOER Cl RECORDS TO GE SPACED OVER WORD 


SDELAY: .WORD 0 sDELAY COUNTER 
-EVEN 


-SBTTL WRTCHR - WRITE CHARACTERISTICS COMMAND 
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- WRITE CHARACTERISTICS COMMAND 
ROUTINE TO ISSUE A WRITE CHARACTERISTICS 
COMMAND SO THAT OTHER COMMANDS WILL BE ACCEPTED 
f 
s INPUT: 
; Ra ADDRESS OF PACKET FROM TEST 
; RS FIRST DEVICE UNIBUS ADDRESS 
; REQUIRES A CALL TO SOFINIT BE DONE PREVIOUSLY 


}OUTPUT : 


+ Chany SEF “HRETE GhaRACTEREST ECS Corman ox 


}IMPLICIT OUTPUT: 


SSM Oe Te AE 


° s Goto FEATURES PRESENT 
BUFFER ENABLE SWITCH ON OR OFF 


sSAVE THE GENERAL REGISTERS 
sCLEAR BUFFER ENABLE SWITCH 
oo EXTENDED FEATURES SW SWITCH 


iWAI FOR SSR 


BR, 
On IP TROUBLE CARRY © CLEAR 
iREND 1558 
UP EXPECTED 
iWAS OFF LINE SET IN TSSR 
36R, IF NO OFL SET 
sMAKE os Pe ALIKE 
i0R, IF EQUAL = OK 
; So unT A DATA PACKET 
eet ADDRESS oF MESSAGE BUFFER 
oe Ss XST2(R3) ENDED ATURES BIT SET? 
EXTFEA }SET EXTENDED FEATURES SW SWITCH 


@X2.BUFE ,XST2(R3) FER SuITCH SET 
504 ae Cg 
BENBSW 1B SUITOR FOR ENABLED 


#17700.ReV {CLEAR UNMANTED -BYTS 


11S TT A NEW RICROCODE 


ssi 

#1 ,EXTFEA eee EZPO FEATURE FOR NEW 

OX2 .EXTF ,XST2CR3) ; FEATURE ALWAYS SET IN 
MICROCODE 


SA 

CLR 
CLR 
MOV 
JSR 
BCS 
BR 

MOV 
MOV 
BIT 
BEQ 


8 Aaa aea88*8er 


S335 
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WRTCHR - WRITE CHARACTERISTICS COMMAND 


09 011040 ’ CARRY NO TROUBLE 
1170 Otio2 Goose, ar ExT 
1111 011044 ooogss : Cc sCARRY CLEAR = ERROR 
lll2 011046 016 000002 MOV sRETURN TSSR CONTENTS 
1113 011052 000207 PC sRETURN 
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SEQ 0056 
REWIND - POSITION TAPE (REWIND) COMMAND 


1115 .SBTTL REWIND - POSITION TAPE (REWIND) COMMAND 
t¢ 
1117 ; 
1118 sTHIS ROUTINE WILL REWIND THE SELECTED TAPE. 
: 
1120 ’ CAUTION: THE ROUTINE DOES NOT WAIT FOR BOT 
1121 ’ TO ARRIVE. ALSO THe CALLER MUST CHECK FOR 
1122 : SSR TO SET IN THE TSSR 
1l12 : 
1124 : 
1125 sCALLING SEQUENCE: 
4 
1127 , DO A SOFT INIT 
1128 , DO A WRITE CHARACTERISTICS 
1129 , JSR PC ,REWIND 
1130 : 
iis _ 
a 
1133 ' RS FIRST DEVICE UNIBUS ADDRESS 
i 
1135 3 
th] sOUTPUT 
4 
iss ’ RO THE CONTENTS OF R4 IS PASSED TO RO 
: 
1140 ; 
1141 ° 
1142 011054 REWIND: : 
1143 011054 SAVREG sSAVE R1-RS UNIIL NEXT RETURN 
1144 011060 012704 011150 MOV SRUPACK sGET P Ss 
1145 011064 010465 000000 MOV TSDBLRS) sSEND PACKET ADDRESS TO EXECUTE 
1146 011070 012703 000550 MOV e360; sENOUGH TIME He FOR 2400' REEL TO REWIND 
1147 011074 004737 016330 10%: JSR Be UALTE ;WAIT FOR SSR 
1148 011100 103417 BCS ATi LEAVE UREN. 33h SET 
1149 011102 DELAY 250. ;WAIT FOR ais 3 
011102 012727 000372 MOV 6250. ,(PC)- 
011106 .WORD 0 
011110 013727 002116 MOV LSOLY,(PC)- 
011114 000000 .WORD 0 
11116 005367 177772 bEC ~6¢PC) 
Oliiss oos367 Bee 
011124 7 177756 DEC "20(PC) 
011130 001367 BNE -20 
1150 011132 3 DEC R3 sBUMP COUNTER DOWN 
1151 011134 001357 BNE 10% sKEEP GO 
1152 011136 000241 cLc CLEAR CARRY TO SET ERROR 
1153 011140 010400 206: MOV R4,RO sPASS THE PACKET ADDRESS 
1134 011142 000207 RTS PC ;RETURN 
11 011150 .*<, ¢10>€177770 
1159 011150 RWPACK: 


1160 011150 102010 -WORD 102010 sPOSTION COMMAND (REWIND) 
1161 011152 000000 -WORD 0 sNOT USED 
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- COMPARE RAM TO 1/0 PACKET 


-SBTTL CKRAM ~- COMPARE RAM TO 1/0 PACKET 
3° 


}ROUTINE TO READ THE FIRST 8 BYTES FROM RAM 
;MEMORY AND COMPARE THIS DATA TO A COMMAND PACKET. 


ADORESS OF THE COMMAND PACKET 
FIRST DEVICE UNIBUS ADDRESS 


SET - RAM MATCHES PACKET 
CLR - RAM DOES NOT MATCH PACKET 


IMPLICIT OUTPUT: 
THE TABLE RAMDATA IS FILLED WITH THE 
DATA HELD IN 
RANSIZ Is SCT 10'8. FOR PRAMPKT ROUTINE 
SIDE EFFECTS: 


THE SUBSYSTEM IS LEFT IN MAINTENANCE MODE 


sSAVE THE GENERAL ty T 
ADDRESS TO SAVE THE RAM DATA 
OF FIRST RAM DATA 
ERROR FLAG 


s SELE 

sWAIT FOR SSR TO 
sREAD THE RAM DAT 
sCOMPARE TO EXPECTED 
BR. IF OK 


MOV 
MOV 
CLR 
JSR 
MOVB 
JSR 
MOV 
JSR 
MOVB 
CMPB 
BEQ 
I 

I 
CMP 
BLE 
TST 
BEG 
CLC 
BR 
SEC 


AND 
30%; sSHOW GOOD COMPARE 
000010 0023502 504: MOV ge : tah 4 RAMSIZ FOR PRAMPKT ROUTINE 
8 URN 


oocoo 
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CKRAM2 - COMPARE RAM TO I/0 CHARACTERISTICS DATA 


-SBTTL CKRAM2 - COMPARE RAM TO I/0 CHARACTERISTICS DATA 
3¢ 


}ROUTINE TO READ THE FIRST 8 OR 10 BYTES FROM RAM 
sMEMORY AND COMPARE THIS DATA TO A CHARACTERISTICS DATA BLOCK. 


}INPUT : 
6 

Ra ADDRESS OF THE CHARACTERISTICS DATA 
RS FIRST DEVICE UNIBUS ADDRESS 
CARRY SET - RAM MATCHES PACKET 

CLR - RAM DOES NOT MATCH PACKET 
IMPLICIT OUTPUT: 

THE TABLE RAMDATA IS FILLED WITH THE 

DATA HELD IN 

RANSIZ Ts SET 108, OR 10. FOR PRAMPKT ROUTINE 
SIDE EFFECTS: 

THE SUBSYSTEM IS LEFT IN MAINTENANCE MODE 


éxRAana: : 


: 
: 
: 
sOUTPUT: 
; 
a 
’ 


¢ 
: 


sSAVE THE GENERAL REGISTERS 
@RAMDATA,R1 sADDRESS TO SAVE THE RAM DATA 
ORMCHBEG , R2 sBYTE ADDRESS OF any RAM DATA 


sBgRnao3y=as 


1 
01 
01 

11 

11 

11 

i 

1 

11 


1264 
1264 
1270 
300 
306 
320 
30 
336 
11340 
11342 
11344 
11352 TS 
11356 
11360 
11366 


3 
Sargurganaay 


1224 
1226 
122 
1230 
1232 
1234 
1236 
12 
1240 
1241 
1242 
124 
1244 
1246 0 
1248 
1250 
i585 
1234 0. 
1255 0. 
1256 0 
1257 0 
1258 0 
1259 0. 
1260 0 
1261 0 
i363 0 
0. 
1264 0 
1265 0 
1266 0 
1267 01 
1268 0 
1269 


Roeeee 
2 


RN 
rer) 
222 
po be be 
BaD 
bee bee 
ys 
ano 
ono -o 








H5 
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CKMSG - COMPARE WRITE CHAR. MESSAGE BUFFERS 
-SBTTL CKMSG - COMPARE WRITE CHAR. MESSAGE BUFFERS 


| id 


}ROUTINE TO O COMPARE A WRITE CHARACTERISTICS EXPD AND RECV 
iBUFFER, THE EXPECTED AND RECEIVED BUFFERS ARE STORED FOR 
sERROR PRINT ROUTINES. 


RECV MESSAGE BUFFER HIGH ORDER ADDRESS 
RECV MESSAGE BUFFER LOW ORDER ADDRESS 
EXPD MESSAGE BUFFER ADDRESS 


SET - MESSAGE BUFFERS MATCH 

CLR -MESSAGE BUFFERS DON'T MATCH 
VIMPLICIT OUTPUT: 
; BUFFER IS SET TO EXPD DATA 


BUFFER IS SET TO RECV DATA 
SET TO HIGH ORDER ADDRESS OF RECV 
SET TO LOW ORDER ADDRESS OF RECV 


sSAVE R1-RS UNTIL NEXT RETURN 
sSAVE RECV HIGH ADDRESS 
sSAVE_RECV LOW ADDRESS 
par ABOVE 2 


NO 
;RETURN ADDRESS BIASED TO PAR6 IN RO 
sGET ey ADDRESS BIASED TO PAR6 


SET 
‘POINT TO NEXT WORD 
DONE FIRST 7 WORDS? 
i8R IF NO 
#1 118 11 A NEW MICROCODE 
x2 .EXTF .xST2(RS 15 EXTENDED FEATURES SET IN EXPD? 
Ra. 016 1OONE EXTENDED FEATURES WORD? 
153 :BR IF NO 
Ra JANY ERRORS SEEN? 


SS$ sBR_ IF NO 
sSET FAILURE 
60% 


PC 


SET SUCCESS 
sRETURN 
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SEQ 0060 
CKMSG2 - COMPARE EXPD RECV MESSAGE BUFFERS 

1330 .SBTTL CKMSG2 - COMPARE EXPD RECV MESSAGE BUFFERS 
1332 }ROUTINE TO COMPARE AN EXPECTED AND RECEIVED MESSAGE 
1333 ;BUFFER. THE EXPECTED AND RECEIVED BUFFERS ARE STORED FOR 
1334 sERROR PRINT ROUTINES. 

: 
1336 s INPUT: 
1337 ; RO RECV MESSAGE BUFFER HIGH ORDER ADDRESS 
13 ’ R1 exe MESSAGE BUFFER LOW ORDER ADDRESS 
133 : R2 MESSAGE 8 UFFER ADDRESS 
1340 , R3 OF BYTES TO COMPARE 

. 
1343 sOUTPUT: 
1343 , CARRY SET - MESSAGE BUFFERS MATCH 
1345 ; CLR - MESSAGE BUFFERS DON’T MATCH 

3 
1346 sIMPLICIT OUTPUT: 
1347 , EXPMSG BUFFER IS SET TO EXPD DAT 

7 
1350 : REVL SET 10 Low ADDRESS Ay REEY 
1351 s 
1352 011550 CKMSG2: : 
1353 011550 SAVREG SAVE R1-RS UNTIL NEXT RETURN 
1354 011554 020327 000144 CMP R3, ORECMSG-EXPMSG; aa0 IS PONT ABOVE MAX ALLOWED? 
1355 011560 003412 BLE 53 bad BR IF NO 
1356 011562 012703 000144 MOV @RECMSG-EXPMSG RS; aD 
1357 011566 PRINTF #@DEBUGMSG hep. 

0 012746 011702 MOV UGMSG , -( SP) 

011572 012746 1 #1,-(SP) 

011576 010600 MOV SP 

011600 104417 TRAP CSPNTF 

011 062706 000004 ADD 64, 

011 010037 002304 S$: MOV RO; RCVHIADD sSAVE RECV HIGH ADDRESS 
1359 011612 010137 002306 MOV R1.RCVLOAD sSAVE RECV LOW ADDRESS 
1360 011616 005737 003134 TST KTENABLE sTES TESTING | ABOVE 28K? 

1361 011 001403 BEQ 108 
1362 011624 004737 017376 JSR PC, SETMAP + OE TURN ADDRESS BIASED TO PAR6 IN RO 
1363 011630 010001 MOV RO.R1 1GET RETURNED ADDRESS BIASED TO PARG 
1364 011632 005004 10: CLR R4 ;WORD IN BUFFER 
1365 011634 005005 CLR RS ;CLEAR ERROR SEEN FLAG 
1366 011636 111264 002322 15%:  MOVB  (R2),EXPMSG(R4) ;SAVE EXPD FOR ERROR REPORT 
1367 011642 111164 002466 MOVB R1),RECMSG(R4) ;SAVE RECV FOR ERROR REPORT 
ieee chess dere gree Sep ecenie ee erm Rec 
t 

1370 0116 003208 one Re A ERROR SEEN FLAG 
1371 011654 062704 000001 25%: ADO 01,R4 sPOINT TO NEXT BYTE 
1372 011660 020403 CMP R4:R3 ;00NE ALL BYTES? 
1375 011662 90200} 8GE 504 36R IF Yes 

664 000 b NEXT 
1375 011666 005705 50$: ey A2 OO S Seen? 
1376 011670 001402 BEQ 55 BR IF NO 
1377 011672 CLC sSET FAILURE 
1378 011674 000401 BR 60$ ' 
1379 011676 000261 55$: SEC sSET SUCCESS 
1380 011700 000207 60%: ATS PC ;RETURN 


1382 011702 
1383 011772 
1384 0120035 
1385 012036 
+308 012071 


012114 


1416 012116 

012116 
1419 012116 
1420 012122 
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004737 
004737 


104423 
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122 
116 
040 


056 
105 


006024 
017262 


007370 


- COMPARE EXPD RECV MESSAGE BUFFERS 
: aa Me pans INTERNAL ERROR -CKMSG2 MESSAGE BUFFER EXCEEDED-' ;aaD 


.ASCII e0/ 

ERCM: .ASCIZ ; TSSR ERROR CODE REC'D = / 
. Z /.... AFTER DOING SOFT INIT/ 
-ASCIZ /TEST: .../ 
EVEN 


sPRINT ROUTINE TO FATAL SOFT INIT ERRORS 
t R1 


SIDE EFFECTS: 
: EXECUTES DROP UNIT TO CEASE TESTING 


CONTENTS OF TSSR AT ERROR 


BGNMSG SFIMSG 


* JSR PC ..PRITSSR sPRINT CONTENTS OF TSSR REGISTER 
JSR PC,CKDROP sDROP UNIT, IF ALLOWED 


L10003: 
TRAP C$MSG 


;PRINT ie TO PRINT THE CONTENTS OF 
‘- AND A COMMAND PACKET OTHER THAN GET STATUS COMMAND PACKET. 


PINPUTS: 


‘ R1 TSSR_ CONTENTS 

s R4 ADDRESS OF COMMAND PACKET 
é 

5 


PKTSSR 
** JSR : PRINT THE CONTENTS OF TSSR REGISTER 
MOV 0s 4, RO NO. OF WORDS IN PACKET 
JSR «PC PRIPKT }PRINT THE CONTENTS OF COMMAND PACKET 


L10004; 
TRAP C$MSG 


SEQ 0061 


MACRO VOS.03 Tuesday 26-Apr-87 10:28 Page 54 
- COMPARE EXPD RECV MESSAGE BUFFERS 
PRINT ROUTINE TO PRINT THE CONTENTS OF 
sTSSR AND A GET STATUS COMMAND PACKET. 
PINPUTS: Pl 


TSSR_ CONTENTS 
ADDRESS OF COMMAND PACKET 


PKTGETS : 
PC ,PRITSSR ‘PRINT THE CONTENTS OF TSSR REGISTER 


ee, sNO. OF WORDS IN GET STATUS PACKET 
PC ,PRIPKT ;PRINT THE CONTENTS OF COMMAND PACKET 


& 
at 


L10005: 
TRAP C$MSG 


;PRINT TSSR ERRORS FOR INITIALIZATION TESTS 
TSSR CONTENTS 
ADDRESS OF COMMAND PACKET 
SFFMSG 
PC ,PRITSSR sPRINT CONTENTS OF TSSR REGISTER 


C$MSG 
PKTMES - PRINT TSSR AND MESSAGE BUFFER 


PRINT ROUTINE TO PRINT THE CONTENTS OF TSSR AND MESSAGE 
;BUFFER FOR ERROR REPORTS 


CONTENTS OF TSSR 

LOW ORDER MESSAGE BUFF 
A HIGH ORDER MESSAGE BUFFER ADDRESS 
NOTE: R3 IS IGNORED IF KTENABLE FLAG IS CLEAR 


004737 006024 JSR sPRINT CONTENTS OF TSSR 
to) RO sLOW ORDER ADDRESS 


030303 ’ ORDER ADDRESS 
004737 014312 PC .PRMESS sPRINT THE MESSAGE BUFFER 


104423 








ye 
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ADDSSR - PRINT TEST ADDRESS AND TSSR 


-SBTTL ADDSSR - PRINT TEST ADDRESS AND TSSR 


PRINT ROUTINE TO PRINT THE CONTENTS OF 
;TSSR AND A MEMORY TEST ADDRESS 


LINPUTS: 
FIRST DEVICE UNIBUS ADDRESS 
HIGH ORDER MEMORY TEST ADDRESS 
LOW ORDER MEMORY TEST ADDRESS 
ADOSSR 
sPRINT MEMORY TEST ADDRESS 


TERR) R1 sGET 
ITSSR ;PRINT THE CONTENTS OF TSSR REGISTER 


C$MSG 
MSGEXP - PRINT WRITE CHAR, EXPD-RECV MESSAGE BUFFERS 


}PRINT ROUTINE TO PRINT WRITE CHARACTERISTIC MESSAGE BUFFER 
‘IMPLICIT INPUTS: 


- EXPECTED MESSAGE BUFFER 
- RECEIVED MESSAGE BUFF 


RECMSG ER 
RCVHIADD- RECEIVED MESSAGE FER HIGH ORDER ADDRESS 
RCVL - RECEIVED MESSAGE FER LOW ORDER ADDRESS 


1EXT FEATURES SET? 


26. ,RO ;EXT FEATURE BUFFER IS 8 WORDS 
* PRMSGEXP SPRINT EXPD/RECV MESSAGE BUFFERS 


extren sASSUME NO EXT FEATURES 


10011: 
T 





MS 
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FIFEXP - PRINT FIFO EXP/RECV DATA 


-SBTTL FIFEXP - PRINT FIFO EXP/RECV DATA 
te 


{PRINT ROUTINE TO PRINT FIFO EXP/RECV DATA 
; Ri - BYTE COUNT 

LIMPLICIT INPUTS: 

q 


EXPECTED MESSAGE BUFFER (CONTAINS FIFO DATA ONLY 
- RECEIVED MESSAGE BUFFER (CONTAINS FIFO DATA ONLY) 


FIFEXP 
OF IFIMSG,R1 sPRINT BYTES TRANSFERRED 
Ri -(SP) 
IF AMSG. (SP) 
SP. RO 
CsONTX 
$6, SP 
oF IF 2MSG ;PRINT HEADER MSG 
OF IF 2MSG, -( SP) 


ea 
$PNTX 


R1.RO :GET BYTE COUNT 
* PRBYTEXP ;PRINT FIFO BYTES IN ERROR 


sn anes 


« 
D 
3S 


ADD 
MOV 
JSR 


L10012: 
TR 


C$MSG 
O45 FIFIMSG: -Aeess ‘SNSA NUMBER OF BYTES TRANSFERRED = #02’ 
116 045 FIF2MSG: even -ASCIZ ‘sNSA FIFO DATA BYTES IN ERROR: ’ 
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MSGSTAT - PRINT STATUS HEADER AND MESSAGE BUFFERS 


-SBTTL MSGSTAT - PRINT STATUS HEADER AND MESSAGE BUFFERS 
3¢ 


;PRINT ROUTINE TO PRINT MESSAGE BUFFER EXPD/RECV 
’ 


SIMPLICIT INPUTS: 
H 


- MESSAGE BUFFER 
- Rece! WESSAGE BUFFER 
VED MESSAGE BUFFER HIGH ORDER ADDRESS 
RECEIVED MESSAGE BUFFER LOW ORDER ADDRESS 
MSGSTAT f 


@STA~COD,.R1 Oonee ADDRESS TABLE 
MSG LINES? 


BR STATUS BIT NAMES 


Her LENA READ STATUS BUFFER 
}PRINT EXPO/RECV MESSAGE BUFFERS 


$ 7. 3. vt 5¢ 64,0 
ps # 


<18>, ' <9> <6> 
weaves se Se Hint ii 


ay i 5 an Word 
S< > "TLuce> OUTRDOY<S> ‘INRDY<4>° 





B6 
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MSGLOOP - PRINT LOOPBACK HEADER AND MESSAGE BUFFERS 


1560 -SBTTL MSGLOOP - PRINT LOOPBACK HEADER AND MESSAGE BUFFERS 
t 


IPRINT ROUTINE TO PRINT MESSAGE BUFFER EXPD/RECV 
IMPLICIT INPUTS: 
EXPECTED MESSAGE BUFFER 
RECEIVED MESSAGE 


cer ME. BUFFER 
- RECEIVED MESSAGE BUFFER HIGH ORDER ADDRESS 
RECEIVED MESSAGE BUFFER LOW ORDER ADDRESS 


012701 013176 MOV sASCII ADDRESS TABLE 
12100 sDONE ALL MSG LINES? 


sBR IF YES 
sPRINT STATUS BIT NAMES 


3:00 ANOTHER MSG LINE 
sNUMBER_OF WORDS IN A READ STATUS BUFFER 
;PRINT EXPD/RECV MESSAGE BUFFERS 


013271 013370 i$, e2. 34,4%,5 tf 74#,0 
6 045 ‘ copback $i 


08 
PARERReiS> 15> is, < IRESV1<13>' 
HISP=>IEOT<12> =>ICER <10>' 
WEM =>IFMK<09> = >ISPEED<07>’ 
TADO=>IRDY<06> IERASE=>ILDP <04>' 
1588 013665 IREW =>IDBY<03> IRWU =>IRWD <02> IFEN »=>IFBY <0O1>' 
tH 013764 GO »=>IFPT<00>' 
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MSGSUB - PRINT WRITE SUBSYSTEM MESSAGE BUFFER 
-SBTTL MSGSUB - PRINT WRITE SUBSYSTEM MESSAGE BUFFER 


| ad 
;PRINT ROUTINE TO PRINT MESSAGE BUFFER EXPD/RECV 
i 


LIMPLICIT INPUTS: 
TED MESSAGE BUFF 


ME. 
RECEIVED MESSAGE BUFFER LOW ORDER ADDRESS 


012700 000012 sSe6 OF WRITE SUBSYSTEM BUFFER 
004737 0146 JSR PRINT EXPD/RECV MESSAGE BUFFERS 
104423 


-SBTTL MEMADD - PRINT MEMORY ADDRESS DATA ERROR 
| iad 


;PRINT ROUTINE TO PRINT MEMORY ADDRESS DATA COMPARE ERROR 
tIMPLICIT INPUTS: 


SPEED Bava 


MEMADO 
PC PRIADD 

iGET ReChIveD MoaTA 
PC, PRIXOR ;PRINT EXPD/RECV 


L10016: 
T C#MSG 
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PRAMPKT - PRINT RAM AND PACKET DATA 
-SBTTL PRAMPKT - PRINT RAM AND PACKET DATA 


;PRINT ROUTINE TO DISPLAY gh ld DATA 
‘om THE RAM DATA DOES NOT MATCH. 


LINPUTS 
POINTER TO COMMAND PACKET 
Ieurcr? naatae’ 
DATA AS READ FROM THE RAM 
: RANSTZ NUMBER OF BYTES IN PACKET 
i IF RAMSIZ=0 THEN DEFAULT TO 8. 


‘IMPLICIT OUTPUTS: 
: RAMSIZ SET TO 0 


BREMPKT: 
SAVREG 
~~ @RAMDATA,R1 
S$: CMPB alana 
7%, NOTSSR 


SAVE R1-RS_UNTIL NEXT RETURN 
yt owe THE RAM 


F 
: 
3 COMPARE ot RECEIVED 
3s6R IF NO MATCH 


3;aaD 

sGET RECV RAM DATA 

3GET EXPD PACKET DATA 
sXOR EXPD/RECV 

;LOW BYTE ONLY 

sGET RECEIVED RAM DATA 

iGET EXPECTED RAM DATA 


014166 06 
1660 014172 005202 R2 sUPDATE BYTE COUNT 
1661 0914200 sDEFAULT TO 6.? 


YES 
663 01 ; ALL BYTES? 
36R IF NO 
1 DONE DEFAULT NUMBER OF BYTES? 
3 
SET DEFAULT RAMSIZ 


1664 014206 

1665 014210 
014212 

1667 014216 

1668 014220 

1669 014224 000207 sRETURN 

1671 014226 . BYTE: SD28A RAM: SO38A Packet: SO38A XOR:803' 

1672 EVEN 





E6 
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PRMESS - PRINT CONTENTS OF MESSAGE BUFFER 
-SBTTL PRMESS - PRINT CONTENTS OF MESSAGE BUFFER 
iTHIS Be PRINTS THE CONTENTS OF 
‘ok 8 WORD MESSAGE BUFFER RETURNED BY THE TSV-05. 


PINPUT: 

: LOW ORDER ADDRESS OF MESSAGE BUFF 

; R1 HIGH ORDER ADDRESS MESSAGE BUFFER 
NOTE: R1 IS IGNORED IF KTENABLE FLAG IS CLEAR 

; THIS ROUTINE IS NORMALLY CALLED FROM A PRINT ROUTINE 


PRMESS: SAVREG 
S 


~ 
«4 


re 
D 


SeeSe er Feo AzS 


0 HI 
sPRINT MESSAGE BUFFER ADDRESS 


=" 
D 
3 


x 


sPRINT HEADER FOR CONTENTS 


017376 


ADO 
PRINT 
MOV 
MOV 
MOV 
TRAP 
ADO 
CLR 
MOV 
MOV 
BEQ 
JSR 
MOV 
PRINT 
MOV 
MOV 
MOV 
MOV 
MOV 


38 


st tat F iatat 


o 
WH 


20 NO 
9X2. EXTF,xST2(R35 Bp FEATUTES ON ? 
208 PRINT EXTENDED STATUS GORD 


50s: PC RETURN 
1711 014500 045 PROASC: “ASCIZ "SNSA Message Bubfer Address = #01805" 
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PRMESS - PRINT CONTENTS OF MESSAGE BUFFER 


1712 014545 045 116 O45 PRIASC: .ASCIZ ‘SNA Message Buffer eel 
1713 014603 045 116 O45 PRASC: .ASCIZ ‘sNSA WordsD1sA; #0 
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SEQ 0071 
PRMESS - PRINT CONTENTS OF MESSAGE BUFFER 


1713 “EVEN 

i717 -SBTTL PRMSGEXP - PRINT EXPD/RECV MESSAGE BUFFERS 
3° 

1718 sROUTINE TO PRINT EXPECTED AND RECEIVED MESSAGE BUFFERS 

1719 ’ RO - NUMBER OF WORDS IN BUFFER 

1720 sIMPLICIT INPUTS: 

1721 ’ EXPMSG EXPECTED MESSAGE BUFFER 

i722 ’ RECMSG - RECEIVED MESSAGE BUFFER 

1723 ; RCVHIADD- RECEIVED MESSAGE BUFFER HIGH ORDER ADDRESS 

1724 ; RCVLOADD- RECEIVED MESSAGE BUFFER LOW ORDER ADDRESS 


35 
& 


2 
& 
eh 
3 


sSAVE R1-RS UNTIL NEXT RETURN 
AVE NUMBER OF WORDS 


0 MOV . 
729 013700 002306 MOV RCVLOADD ,RO :GET RECV LOW ADDRESS 
1730 014644 01 MOV R4 sCOPY LOW 
1731 014646 013701 002304 MOV RCVHIADD,R1 sGET RECV HI 
1732 014652 1 ROL sSHIFT 61T15 TO C BIT 
1733 014654 006101 ROL sSHIFT TO HIGH ORDER FOR PRINTOUT 
14656 PRINTX @PRMSGO,R1,R4 PRINT MESSAGE BUFFER ADDRESS 
Orage oronae MOV ne. -($P 3 
014662 012746 015012 MOV @PRMSGO, -(SP) 
1. 012746 MOV 63,-(SP) 
014672 01 MOV SP‘ RO 
014674 104415 TRAP CSPNTX 
014676 062706 000010 ADD $10,SP 
1735 014702 PRINTX ;PRINT HEADER FOR CONTENTS 
014702 012746 015057 MOV OPRMSG1 , -( SP) 
014706 012746 MOV #1,-(SP5 
014712 01 MOV 
014714 104415 TRAP CSPNTX 
014716 062706 000004 ADD SP 
736 014722 CLR ;NUMBER OF THE CURRENT WORD 
1737 014724 012701 002322 MOV GEXPMSG,R1 :GET EXPD BUFFER ADORESS 
1738 014730 012702 002466 MOV @RECMSG.R2 IGET RECV BUFFER ADDRESS 
1739 014734 011100 20%: MOV (R1),RO sGET EXPD 
740 014736 011203 MOV (R2).R3 iGET RECV 
1741 014740 XOR RO,RS ;XOR EXPD/RECV 
1742 014750 PRINTX #@PRMSG2,R4,(R1)-,(R2)+,R3 
014750 010346 MOV R3,-(SP) 
014752 01 MOV CRE)-,-(SP 
014754 012146 MOV R1)+,-(SP 
014756 010446 MOV R4, -( SP) 
014760 012746 015115 MOV OPRMSG2, -( SP) 
014764 012746 000005 MOV 65,-(SP) 
014770 010600 MOV SP‘ RO 
014772 104415 TRAP CéPNTX 
14774 062706 000014 ADO 614,SP 
1743 015000 005204 INC R4 sNUMBER OF THE NEXT 
1744 015002 020405 CMP R4,RS sD0NE ALL YET? 
1745 015004 002001 BGE 503 38R IF YES 
1746 015006 000752 BR 20% :D0 ANOTHER 
1747 015010 000207 50s: RTS PC euf RETURN 
1748 015012 045 116 045 : .ASCIZ ‘SNSA Message Buffer Address = #01505’ 
1749 015057 045 116 045 PRMSG1: .ASCIZ ‘sNSA Moseege Buffer Contents: ' 
1750 015115 045 116 045 : :ASCIZ ‘siNSA @sD2sA EXPD: 068A RECV: SO068A XOR: #06’ 





H6 


17862 0. 

1783 015272 

1784 015300 

1786S 015302 
015302 
015304 
015310 
015314 
013328 
015326 
015330 
015332 

1786 015336 


TSV3 - GLOBAL AREAS 
PRMSGEXP - PRINT EXPD/RECV MESSAGE BUFFERS 


MACRO VOS.03 Tuesday 28-Apr-87 10:28 Page 63 


015552 
015550 


015416 
000005 


000014 


002320 
015503 
000002 


000010 


SEQ 0072 


SBPiL PRBYTEXP - PRINT ERROR BYTES IN EXP/REC MESSAGE BUFFER 
’ 


iROUTINE TO PRINT ERROR BYTES IN MESSAGE BUFFERS 
ONLY THE FIRST & ERRORS ENCOUNTERED ARE PRINTED DUE TO SCREEN SPACE 
; 


; RO - NUMBER OF BYTES IN BUFFER 
3 
sIMPLICIT INPUTS: 
3 
; EXPMSG - EXPECTED MESSAGE BUFFER 
: RECMSG - RECEIVED MESSAGE BUFFER 
_ 
PRBYTEXP: : 
SAVREG sSAVE R1-RS UNTIL NEXT RETURN 
MOV RO,RS sSAVE NUMBER OF BYTES 
CLR PRMNO INIT COUNT 
CLR R4 , OF THE CURRENT BYTE 
MOV SEXPMSG,R1 :GET EXPD BUFFER ADDRESS 
MOV @RECHSG. R2 :GET RECV BUFFER ADDRESS 
20$: MOVB  (R1),RO° sGET EXPD BYTE 
BIC $tC<377>,RO sCLEAR UPPER BYTE 
MOVB sSAVE FOR T 
MOVB (R23) 3GET RECV BYTE 
BIC bon Sot R3 sCLEAR UPPER BYTE 
Move R3,PRBeREC 3FOR ERROR T 
XOR RO.R3 sXOR EXPD/RECV 
CMPB (R1)+,(R2D- sEXPD = RECV? 
BEQ $ :8R IF YES 
INC PRMNO ;UPDATE ERROR COUNT 
CMP PRMNO, 08 ;PRINTED 87? 
BHI 30% BR IF YES 
27%:  PRINTX #@PRBMSG,R4, »PRBREC, 
MOV R3,-C(SP3 
MOV PREREC. -( SP) 
MOV PRBEXP, -(SP 
MOV R4,-(SP) 
MOV @PRBMSG, -( SP) 
MOV 0, ager) 
MOV SP 
TRAP C$PNTX 
ADD $14, SP 
FORCEXIT S0$ 3@aD 
ies BR 35% :@a0 
FORCERROR 27$,NOTSSR ,a@aD 
35%: :aa0 
INC R4 sNUMBER OF THE NEXT 
CMP R4,RS sDONE ALL YET? 
BGE 503 iBR IF YES 
50$: PRINTX SPRBTOT , PRINO PRINT TOTAL ERROR COUNT 
MOV OPRBTOT , -( SP) 
MOV »-C(SP5 
MOV : 
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015406 
015410 
1796 015414 
1797 
1798 015416 
1799 015503 


1801 015550 
015552 


062706 000006 


045 116 
045 116 
000000 
000000 


004737 007742 


004737 007612 


104423 


045 PRBMSG: 
04S PRBTOT: 


TRAP 
ADD 
RTS 


PRBEXP; 
PRBREC: 


te 


- WORD 


-ASCIZ 
-ASCIZ 
-EVEN 


SBTtL 
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PRBYTEXP - PRINT ERROR BYTES IN EXP/REC MESSAGE BUFFER 


CS$PNTX 
6, SP 


PC sRETURN 


‘SNSA =6BYTE O8D28A_ EXPD: SO38A RECV: SOSA 
‘sSNA NUMBER OF BYTES IN ERROR = #02’ 


0 sEXPD 
0 RECV 
EXPREC - PRINT EXPD/RECV WORD DATA 


}PRINT ROUTINE TO DISPLAY EXPD/RECV DATA 


}INPUTS: 


3 * 


RECEIVED DATA 
EXPECTED DATA 


EXPREC 


PC ,PRIXOR sPRINT THE DATA 


C$#MSG 
EXPBREC - PRINT EXPD/RECV BYTE DATA 


;PRINT ROUTINE TO DISPLAY BYTE EXPD/RECV DATA 


PINPUTS: 

‘ 

3 R1 
; R2 


- SBTTL 
i? 


RECEIVED DATA BYTE 
EXPECTED DATA BYTE 


EXPBREC 


PC ,PRIBXOR sPRINT THE DATA 
C$MSG 


RAMERR - PRINT RAM AND PACKET DATA 


3 
sPRINT ROUTINE TO DISPLAY RAM/PACKET DATA 


}INPUTS 8 
Ra 


POINTER TO COMMAND PACKET 


XOR: #03’ 


SEQ 0073 


J6 


TSV3 - GLOBAL AREAS MACRO VOS.03 Tuesday 28-Apr-87 10:28 Page 63-2 
RAMERR - PRINT RAM AND PACKET DATA 


SEQ 0074 


1845 }IMPLICIT INPUTS: 
i8a$ ; RAMDATA DATA AS READ FROM THE R 
1848 ; RAMSIZ NUMBER OF BYTES IN PACKET 
1849 : IF RAMSIZ*0 THEN DEFAULT TO 8. 
1851 IMPLICIT OUTPUTS: 
3 
1853 RAMSIZ SET TO 0 
1854 a 
1855 
1856 015570 BGNMSG RAMERR 
015570 RAMERR: : 
1857 015570 004737 014046 JSR PC, PRAMPKT ;PRINT RAM/PACKET DATA 
1858 015574 
015574 10021: 
reso C1257 108a23 TRAP —-C4MSG 
1860 .SBTTL RAMTADD - PRINT TEST ADDRESS, RAM AND PACKET DATA 
| id 
1862 
1863 ;PRINT ROUTINE TO DISPLAY RAM/PACKET DATA 
+063 INPUTS: 
1867 : Ra POINTER TO COMMAND PACKET 
1869 }IMPLICIT INPUTS: 
1871 : RAMDATA DATA AS READ FROM THE RAM 
1872 ; RAMSIZ NUMBER OF BYTES IN PACKET 
1873 ; IF RAMSIZ*0 THEN DEFAULT TO 8. 
1874 ; ERRHI HIGH ORDER TEST ADDRESS 
1875 ; ERRLO LOW ORDER TEST ADDRESS 
1877 }IMPLICIT OUTPUTS: 
1879 ; RAMSIZ SET TO 0 
1880 3- 
1681 
1882 015576 BGNMSG RAMTADD 
015576 RAMTADD: : 
1°53 015576 004737 010274 JSR PC, PRITADD PRINT TEST ADDRESS 
4684 015602 004737 014046 SR PC’ PRAMPKT }PRINT RAM/PACKET DATA 
1885 015606 
015606 10022: 
rese 215608 108428 TRAP —-C4MSG 
| 3887 .SBTTL RAMEXP - PRINT RAM EXPD/RECV DATA 
te 
1889 
1890 PRINT ROUTINE TO DISPLAY EXPD/RECV DATA 
7 
1892 ;INPUTS: 
169 3 
1894 ; Ri RECEIVED DATA 
1895 ; R2 EXPECTED DATA 
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RAMEXP - PRINT RAM EXPD/RECV DATA 
CONTROLLER RAM ADDRESS 


RAMEXP 

@tC<377>,R1 sSAVE EXPD RAM DATA BYTE 
@tC<377>,R2 

PC ,PRIRAM 

PC ,PRIXOR 


C$MSG 


-SBTTL TIMEXP - PRINT TIMER A,B AND EXP/REC 
| ad 


;PRINT ROUTINE TO DISPLAY EXPD/RECV DATA 
sAND TIMER A,B HEADER MESSAGE 


}INPUTS: 


RECEIVED DATA 
EXPECTED DATA 


64 ,SP 
PC ,PRIXOR sPRINT THE DATA 


C$MSG 
-ASCIZ ‘sSNSA TIMER A STATUS IS IN BIT SeNSA TIMER B STATUS IS IN BIT 2’ 
-SBTTL BADSSR - PRINT TSSR ERRORS ON DATA TRANSFERS 


;PRINT ROUTINE FOR TSSR ERRORS ON DATA TRANSFERS 
PINPUTS: 


é 
R2 BATA URITTEN (8 BITS) 


010246 Mov R2,-(SP) sSAVE DATA TRANSFERRED 
1940 015762 BIC $177400,R2 sGET JUST ONE BYTE 
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BADSSR - PRINT TSSR ERRORS ON DATA TRANSFERS 
1941 015766 
015766 


016020 
000002 


6 
1945 016020 


PRINTB @XFERASC,R2 
MOV R ) 


sRESTORE R2 
sDECODE TSSR CONTENTS 


C$MSG 
-ASCIZ ‘sSNA Date Transferred = #03’ 
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GLOBAL SUBROUTINES SECTION 
1947 -SBTTL GLOBAL SUBROUTINES SECTION 
194 


See 


a 
s THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 
s THAT ARE USED IN MORE THAN ONE TEST. 
g°° 

-SBTTL SOFINIT - SOFT INITIALIZE OF CONTROLLER 


T_INITIALIZE OF THE CONTROLLER 
T REGISTER. AFTER THE panes 


elidn Soa ce tackted ne cateed Pate cham 
SINPUTS: 
RS ADDRESS OF FIRST REGISTER 
;OUTPUTS: 


| adaladenlatadatelalalant 
ab PPR ab 
ad wor 


CONTENTS OF TSSR ERROR 
SET IF INIT WAS oxAY 
CLEAR IF PATA ERROR 


SS,RS 
INIT 
TINUE 
;REPORT FATAL ERROR 


’ 
’ 
: 
3 
’ 
3 
sCALLING SEQUENCE 
é 
; 
j 
s 
i 
é 
’ 


an ne tan 
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CHKAMB - CHECK TSSR FOR AMBIGUITY 
1336 .SBTTL CHKAMB - CHECK TSSR FOR AMBIGUITY 
1998 " 


i THIS yy TESTS THE CONTENTS OF THE TSSR REGISTER 
hen AMBIGUI 


INPUT: 

RO CONTENTS OF TSSR 

}OUTPUT : 

RO CONTENTS OF TSSR 

! Si: NaNSBE Toons 
= 


HSAVE THE GENERAL REGISTERS 
RO,R4 sCONTENTS OF TSSR 
ost ,RO iz3 BIT 15 Ser ? 


S¢ 
1C<NBA!OFL!SSR!HI ANY OTHER BITS SET ? 
40$ AN 


SET ? 
EP eet 


45% 
ytereers oRO 


50¢ 
PC 
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ENAINT ,OSBINT - ENABLE/DISABLE INTERRUPTS 

2041 -SBTTL ENAINT,OSBINT - ENABLE/DISABLE INTERRUPTS 
DEFAULT DISPLAY INTERRUPT HANDLERS. 
IF DISPLAY TIME-OUT, REPORT DEV FATAL, AND ABORT PASS. 
OTHERWISE, SAVE DPU REGISTERS AND DISMISS. 
BIT DEFINITIONS FOR “INTMASK” AND “INTFLAG” BYTES: 


IOKCKIN=B61T7 + DON'T CHECK FOR BAD INTERRUPTS -- TEST WILL. 
IOKSTP=BITO s EXPECT “STOP” INTERRUPT. 
B 


Po pga MASK “syle nana INTERRUPTS 


MASK E 
INTERRUPT FLAG -- SAYS WE GOT ONE CIF POSITIVE) 
INTFLAG: ‘BYTE 0 


SAVED INTERRUPT VECTOR: 
ENTVEC WORD 0 


SAVE CPU PC 
INTCPC: .WORD 0 
SUBROUTINE TO ENABLE INTERRUPTS 
ENAINT: MOV =(SP) 


VE RO 
1GET POINTER TO VECTORS 
sSET UP INTERRUPT VECTOR 


sRESTORE RO 
sSET CPU TO LEVEL O 


SeRERESSooiavueoassenbes 


TO DISABLE | INTERRUPTS (RAISE PRIORITY TO LEVEL 7) 
$enio7: 2p) 
TTL INTR  - INTERRUPT HANDLERS 
INTR ;DEFINE INTERRUPT ENTRY 
#1, INTRECV sSET FLAG TO SHOW INTERRUPT RECEIVED 
RB  INTFLAG sCLEAR FLAG TO SAY WE GOT INTERRUPT 
ITB #§ #IOKSTP,INTMASK ;EXPECTING STOP INTERRUPT? 
BNE 1 30R IF YES 
BISB  SI0KSTP,INTFLAG ;NO. SET THE ERROR FLAG. 
SAVE REGISTERS, MSG BUFFER, ETC. 
‘ ENDSRV 


L10026: 
RTI 


(SP) 
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- WAIT FOR SUBSYSTEM READY 
.SBTTL WAITF - WAIT FOR SUBSYSTEM READY 
; SUBROUTINE TO WAIT FOR THE SUBSYSTEM READY FLAG 
SINPUTS: 
ADDRESS OF FIRST DEVICE REGISTER 


CONTENTS OF LAST TSSR READ 


GER - TIMEOUT WATTING FOR READY 
sis olesse Breax 3 INDO A SUPUSR BREAK FIRST. 


2106 O1e3sa Sheree $1100, -(SP) <APRIL-83 REV 8 00 TIMER 
2107 016340 000002 MOV TSSRCRS).RO ea so 


a ice Sef REGISTER 
sTEST FOR READY BIT SET 


3% s EXIT ON STOP FLAG. 
i 3 WAIT 100 USEC 

aaa 

L#DLY. CPC)» 

~6¢PC) 

-22(PC) 

tses sREDUCE DELAY COUNT 

2 sRETRY | UNTIL TIMER EXPIRES 


: c oR fase arTCR stat RUNNING. . 
300 _ MSEC. 


CSP )- aaa: epuTROLLER 78 GHANGING CARRY BIT 


2116 016414 PC 
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CHKTSSR - CHECK TSSR FOR READY 


$i3$ 016416 004737 016350 
1 oigega 004737 016124 
2137 0164 93008 
138 016432 a fhe 100000 
2140 016440 032700 074000 


144 0164 00026 
‘ot 0164 00020 


21 

2156 016456 012737 016510 
012737 000200 
005003 

$3) 016474 005711 

Sieh 016476 020102 

site 016500 

2163 016502 062701 000002 

gies SES e078 

2166 016512 12116 016520 

2167 016516 

2168 016520 


$370 ot 016 001401 
333 St 6532 00026 
2172 016534 00020 
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SEQ 0061 


-SBTTL CHKTSSR - CHECK TSSR FOR READY 


ITHIS ROUTINE WAITS FOR RE Y IN THE TSSR 
1 AND TESTS FOR AMBIGUOUS BIT SETTINGS IN TSSR. 


PINPUT: 
: RS ADORESS OF CSR REGISTERS 
}OUTPUT : 
: CONTENTS OF TSSR 
: CARRY SET - OKAY 
; CLR - NOT READY AMBIGUOUS, OR SC SET 
bvatssr: 
JSR PC WAITF ;WAIT FOR READY 
BCC 203 sBRANCH IF Bi. OuT 


eee le I a oe ITION SET? 


ace 15% s6R IF NO 
61 7 tmataaaaaaai cin sANY ERROR BITS SET? 


3 
10$: ore sSeT FAILURE 
ate BR 208 
$ 
333: REE owe iSET SUCCESS, 
“SBTTL XNXM  - CHECK FOR NONEXISTENT MEMORY 
} ROUTINE TO TEST FOR A NEXM IN THE RANGE (R1) THRU (R2). 
: ON RETURN, “C" = 1, CR1) = NEXM ADORESS. 
’ “C€" = 0, ALL ADORESSES OK. 
$ 
sCALL: MOV ADR1,R1 
: MOV i 
] JSR a 
: RET sTEST “c* PROCEED. 
XNXM: MOV 62% ,a04 BUSERR VECTOR. 
MOV OPRI04, 206 
CLR R3 FLAG. 
1s: TST (Ri) TEST THE ADDRESS(ES). 
sIF ANY TRAP TINUE AT 2¢. 
Seo (BR IF FINESHED (NO NEXM’ S) 
| e 
ADO $2,R1 3SET FF INESHED (NO 
BR 1% 3...AND CONTINUE. 
2¢: COM R3 :GOT ONE, SET FLAG... 
MOV 03¢,(SP) 
RTI 3...AND DISMISS INTERRUPT... 
3: CLRVEC 04 +...AND GIVE BACK THE VECTOR 
MOV $4, RO 
TRAP CéCVEC 
TST RS 1DID We CATCH ONE 72 
-° 8 “C* = NEXT 
SEC = sveS, "C* = i, (R1) = NEXM ADOR 


E7 
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SEQ 0082 
TSTLOOP - CHECK ITERATION COUNT 
2174 .SBTTL TSTLOOP - CHECK ITERATION COUNT 
17% } SUBROUTINE TO EXECUTE TEST ITERATIONS. 
3177 ; EXIT WITH “C” SET IF LOOPS ALLOWED ANDO LOOP COUNT NON-ZERO. 
sit5 } LOOP COUNTER IS SET BY “BEGIN. TEST” MACRO. 
2180 } CALL: LOOPTO ARG 
2182 016536 tstLooP: 
5183 016536 005737 002166 ist —sNOITS ; ITERATIONS INHIBITED? 
5184 016542 001006 BNE «i ; YES. 
5185 016544 005737 002202 TST  QvP + NO. 
5186 016550 100403 BMI sls {LOOPS DISALLOWED IN QUICK PASS. 
5187 016552 005337 002214 DEC _—_ LOOPCNT ; BUMP LOOP COUNTER. 
5188 016556 001002 BNE «a2 
5189 016560 000241 1s: CLC ;LOOP DISALLOWED, OR DONE. 
5190 016562 000401 BR 34 
5191 016564 000261 2: SEC ;LOOP ENABLED. 
2192 016566 000207 34: RTS = PC 
2194 .SBTTL TSTSETUP - PRINT TEST NAME AND INIT ERROR COUNTS 
5196 } PRINT THE NUMBER AND NAME OF EACH TEST AS WE GO ALONG. 
5197 ; INCREMENT "TESTK" TO INDICATE THE NUMBER OF TESTS 
5198 + IN THE CURRENT RUN SEQUCNEE. 
5199 1 CLEAR THE ERROR COUNTER AND” SIGNATURE EXTENSION FLAGS. 
S301 SINPUT: 
$508 ; RO POINTER TO TEST ID ASCIZ STRING 
2204 3 
seoe s OUTPUT: 
3207 ; RS ADDRESS OF FIRST DEVICE REGISTER 
2209 ‘IMPLICIT OUTPUTS: 
2211 : TSTCNT UPDATED TO COUNT TESTS PERFORMED SINCE START OR RESTART 
2218 }SIDE EFFECTS: 
5315 ; INTERRUPT LEVEL IS RASIED TO LEVEL OF 
3316 ; THE DEVICE UNDER TEST 
2217 i 
2218 i- 
3219 
2220 016570 TSTSETUP:: 
2221 016570 010046 Mov RO, -¢ SP) sSAVE THE TEST ID MESSAGE 
016572 005037 003154 R SIFL ' EAR © ‘ T* FLAG 
016576 005037 017036 R «ERK : CLEAR COUNTER. 
5224 016602 005037 005772 R —sEXTA } CLEAR ON FLAG. 
5225 016606 105037 016224 CLRe INT > CLEAR MASK (CHECK ERROR) 
5226 016612 013700 002200 MOV —«sUNITN, RO ; UNIT MBER 
5227 016616 006300 AS RO > MAKE OFFSET. 
5228 016620 005737 003114 1S NODEV ' 36 STARTUP FIND CE? 
016624 001430 BFQtiéS: 1 BR IE YE 
5230 016626 100010 PL tié‘SS ; OR IF NOT IOLE 


F7 
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TSTSETUP - PRINT TEST NAME AND INIT ERROR COUNTS 


2231 016630 160000 003176 160000, ERTABL(RO) ; FLAG ERROR IN THE ERROR TABLE 
5332 0166 1, NO DEVICE HERE -- PRINT IT 


1 
NXR 


ae 


2$ 
#160001 , ERTABL (RO) FLAG ERROR IN THE ERROR TABLE 
NOINIT 


160001 003176 34: 
FS s DEVICE "NOT IOLE 


a 


177777 (003112 2¢: DROP THE UNIT 
002200 


ABORT THE PASS 


"Bis 


GET THE OPERATOR FLAGS. 
’ ne THE TEST NUMBERS? 


BR 
GET THE ID ME 
:DISPLAY THE TEST ID 


s_ BUMP TEST COUNTER. 
;PRIORITY THAT OF DEVICE 


;FIX UP THE STACK 
4 ; ADDRESS OF TSV REGISTERS ON UNIBUS 
TNAM: .ASCIZ ‘SSsTSA Test’ 
“SBTTL TSTEND - PRINT ERRORS RECEIVED 


} AT END OF EACH TEST, PRINT THE NUMBER OF ERRORS RECEIVED 
: NORMAL ERROR REPORTING IS DISABLED (FLA:IER). 


é 

TSTEND: RFLAGS 
TRAP 
BIT 
BE! 


+ BR IF “IER* NOT SET. 
+ PRINT ERROR COUNT. 
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TSTEND - PRINT ERRORS RECEIVED 
62708 000006 
00020 


101 
122 


1s: Rie pe’ 


ERRK: 0 s LOCAL ERROR COUNT. 
ESUM: -ASCIZ /#A_#08A_ERRORS/ 


EMAXDU: -ASCIZ ZERROR LIMIT REACHED -- DROPPING UNIT/ 
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SEQ 0085 
INCERK - INCREMENT LOCAL ERROR COUNT 


2269 .SBTTL JINCERK - INCREMENT LOCAL ERROR COUNT 
| ad 

2271 3 ROUTINES TO INCREMENT LOCAL ERROR COUNT AND CHECK FOR LIMIT: 
2273 017124 005237 017036 ENCERK: INC ERRK s INCREMENT LOCAL ERROR COUNT 
2274 017130 010046 MOV RO,-(SP) : SAVE RO 
2275 017132 013700 002200 MOV UNITN, RO 3 GET UNIT . 
2276 017136 006300 ASL RO 3... AND MAKE IT A WORD OFFSET. 
2277 017140 062700 003176 ADO #ERTABL ,RO s RO GETS ADDRESS OF ERROR TABLE ENTRY. 
2278 017144 005210 INC (RO) ’ THE DEVICE ERROR COUNT 
2279 017146 032710 007777 BIT $7777, (RO) 3 DID WE OVERFLOW THE FIELD? 
2280 017152 001001 BNE 1$ ; BR IF NO. 
2281 017154 005310 DEC CRO) 3 YES -- BACK IT UP TO 7777. 
2282 017156 012600 1s: MOV (SP)+,RO 3 RESTORE RO 
2285 017160 RTS PC ; RETURN TO CALLER. 
2285 017162 010046 CKEMAX: MOV RO, -(SP) s SAVE RO 
2286 017164 013700 002200 MOV UNITN, RO ; GET UNIT NUMBER 
2287 017170 006300 ASL RO Some MAKE IT A WORD OFFSET 
2288 017172 016000 003176 MOV ERTABL(RO),RO ; GET ERROR TABLE ENTRY 
2289 017176 042700 17 BIC #170000 ,RO 3 EXTRACT ERROR COUNT FIELD 
2290 017. 020037 002172 CMP RO, GERRMAX s IS GLOBAL LIMIT EXCEEDED FOR THIS UNIT? 
2291 017 103004 BHIS i$ ; BR IF YE 
2292 017210 023737 017036 002170 CMP ERRK , LERRMAX : IS LOCAL LIMIT EXCEEDED FOR THIS TEST? 
2293 017216 103417 BLO 2 : OR IF 
2294 017220 1s: RFLAGS RO 3 GET OPERATOR FLAGS 

017220 104421 TRAP = C$RFL 
2295 017222 032700 000040 BIT #IDU,RO s IS DROPPING INHIBITED? 
2296 017226 001013 BNE 2% ; BR IF YES. 
2297 017230 012737 177777 003112 MOV $-1,DUFLG 3 NO -- DROP THE UNIT 
2298 017236 ERROF  4,EMAXDU 

017236 104455 TRAP C$ERDF 

017240 .WORD 4 

017242 017057 ‘WORD  EMAXDU 

017244 “WORD O 
2299 017246 BODU UNITN 

017246 013700 002200 MOV UNITN, RO 

017252 104451 TRAP $0000 
2300 017254 DOCLN 

017254 104444 TRAP  C$DCLN 
2301 017256 012600 2$: MOV (SP)+,RO : RESTORE RO 
2302 017260 000207 RTS PC ; RETURN TO CALLER 
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CKDROP - CHECK IF UNIT 
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SHOULD BE DROPPED 


SEQ 0066 


2304 .SBTTL CKDROP - CHECK IF UNIT SHOULD BE DROPPED 
305 3° 
2306 ; CHECK IF UNIT SHOULD BE DROPPED 
2307 . 
5308 017262 010046 bxpRoP: MOV RO, -(SP) 
2309 017 F 1%,NOTSSR 
2310 017274 RFLAGS 
017274 104421 TRAP C$RFLA 
2311 017276 032700 000040 BIT #IDU,RO 
2312 017302 001010 BNE 1$ 
2313 017304 011600 MOV (SP),RO 
2314 017306 012737 177777 003112 MOV $-1,DUFLG 
2315 017314 DODU tN 
017314 013700 002200 MOV UNITN, RO 
017320 104451 TRAP C$D0DU 
2316 017322 mates: DOCLN aaa ;ABORT THE PASS 
2317 o17ssa b12600 1s: MOV FERS NRo 
2318 017326 000207 RTS PC 
2521 .SBTTL CONFIG - DETERMINE CONFIGURATION OF SYSTEM 
3 
2528 ; SUBROUTINE - DETERMINE CONFIGURATION OF TSVOS SYSTEM. 
5355 0173 tonriG: 
2326 017330 004737 016054 PC, SOFINIT 
2327 017334 7 RTS 
2326 .SBTTL KTON,KTOFF - ENABLE/DISABLE MEMORY MANAGEMENT 
329 ° 
2330 ; SUBROUTINE - ENABLE MEM MGT 
. 
2332 017336 005737 003132 KTON: TST KTFLG s GOT KT? 
2333 01 001 BEQ 1$ : NO. 
2334 01 012737 000001 177572 MOV #1,SRO ; YES. ENABLE KT12. 
2335 017352 1s: RTS PC 
2336 
2337 3 
2338 ; SUBROUTINE - DISABLE MEM MGT. 
o 
2340 01 005737 003132 KTOFF: TST KTFLG ; GOT KT11? 
2341 017360 001405 BEQ 1$ : NO. 
2342 01 000240 NOP 
2343 017364 000240 NOP 
2344 017366 012737 000000 177572 MOV 90,SRO ; DISABLE KT. 
2345 017374 1s: RTS PC 
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SETMAP - SETUP PAR6 MAPPING 
2347 
2348 


368 017402 005737 003132 
406 


2402 017502 
2403 017506 004737 017354 


SEQ 00867 


.SBTTL SETMAP - SETUP PAR6 MAPPING 
| iad 
THIS ROUTINE SETS UP KERNEL 


PAR6 TP_HANDLE 
VAN 18 BIT ADDRESS. THE OFFSET INTO THE PAGE 
31S RETURNED BIASED TO PARG. 


;INPUTS: 

: RO HIGH ORDER ADDRESS BITS 

: Ri LOW ORDER ADDRESS BITS 

sOUTPUTS: 

; RO OFFSET INTO BLOCK WITH PAR6 BIAS (I.E. THE ADDRESS) 

: CARRY SET IF SUCCESS 

3 CLR IF 

geTMaP 
SAVREG ;SAVE R1-R4 UNTIL NEXT RETURN 
TST KTFLG ;SYSTEM HAVE ABOVE 28K? 
BEQ 10% 3BR IF NO 
Mov R1.R2 SAVE LOW ORDER BITS 
ASR RO sCONVERT WORD ADDRESS TO 32W BLOCKS 
ROR Ri sMAKE IT DOUBLE PRECISION 
BIC #177 R1 sALINE FOR LOWER 4K BOUNDAR 
CMP 1,KTFLG sHIGHER THAN EXISTING MEHORY ? 
BHIS 104 38R IF YES 
MOV 1, BOKIPARG sSETUP MAPPING REGISTER PAR6 
BIC #160000 ,R2 sSETUP D PAGE 
ADD #140000; R2 ;ADD IN PAR6 BIAS 
MOV , sRETURN IN RO 
SEC 3SET 
BR 15% 3 

108: CLC sSET FAILURE 

15%: RTS 


PC RETURN 

“SBTTL FILLMEM - FILL MEMORY WITH BACKGROUND PATTERN 
FILL MEMORY WITH A BACKGROUND PATTERN 
INPUTS: 

RO = BACKGROUND PATTERN 

FREE = FIRST LOCATION AVAILABLE TO DIAGNOSTIC 

KTFLG = SET TO HIGHEST MEMORY LOCATION IF > 26K. 
OUTPUTS: 

NONE 


FILLMEM: 
VREG 1SAVE_R1-RS UNTIL NEXT RETURN 
JSR PC .KTOFF DISABLE K 
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FILLMEM - FILL 
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MEMORY WITH BACKGROUND PATTERN 


003124 
003126 


003132 
017336 
003152 


172354 
003132 


007600 


172516 


10%: 


30%: 


35%: 


ma Ae ee 


@ 
WH 
io 


sya SEgRaRg 


PC, SETMAP 
R3,(CRO)- 
RO, #160000 


#20000 , RO 
$200 , AOKIPARG 
BOK IPARG, KTFLG 


SEQ 0086 


sCOPY TEST PATTERN 

sGET FIRST FREE LOCATION 

sSIZE FREE SPACE BELOW 26K. 
sSTORE A BACKGROUND WORD 

sDONE ALL MEMORY IN FREE SPACE? 


sHIGH ORDER ADDRESS STAR 

iGET >26K START ADDRESS CIN 32W BLOCKS) 
sCLEAR ¢ er 

sCONVER BF OCKS TO WORDS 

sMAKE IT DOUBLE PRECISION 

sSETUP PAR6 MAPPING REGISTER 

I STORE TEST PATTERN IN + + ADDRESS 
sEND OF PARG6 MAPPING AREA? 


NTO a MAPPING BEGIN 
4K BLOCK >26K. 


3 KEEP GOING 
sREACHED 18 BITS? 
3 
sNO KEEP GOING 
iSET 22 BIT RELOCATION 
sKEEP GOING ON ETC. 
s DISABLE KT. 
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CMPMEM - COMPARE MEMORY TO BACKGROUND PATTERN 
-SBTTL CMPMEM - COMPARE MEMORY TO BACKGROUND PATTERN 
} COMPARE MEMORY WITH A BACKGROUND PATTERN 
INPUTS: 
RO = 


BACKGROUND PATTERN 
FREE = FIRST LOCATION AVAILABLE TO DIAGNOSTIC 
KTFLG = SET TO HIGHEST MEMORY LOCATION IF > 28K. 


- CLR IF ERROR 

IMPLICIT OUTPUTS: 
ERRHI ERROR HIGH ADDRESS 
ERRLO OW ADORESS 
cv 


RECEIVED DATA 


] 


¢ 
a 


sSAVE R1-RS UNTIL NEXT RETURN 
icOeY TEST PATTERN 


1GET FIRST FREE LOCATION 
seize OF F 


REE SPACE BELOW 28K. 
ts veee LOCATION EQUAL TO EXPD? 


GH 
sSAVE EXPD FOR 
sSAVE RECV FOR ERROR 


IPOINT TO NEXT ADORESS 
DONE ALL MEMORY IN FREE SPACE? 


CET oak START ADORESS. CIN 32W BLOCKS) 


sCONVERT BLOCKS TO WORDS 
sMAKE IT DOUBLE PRECISION 


MOV 
JSR 
MOV 
MOV 
chp 
BEQ 
MOV 
CLR 
MOV 
MOV 
BR 
TST 
ber 
8G 
TST 
BEQ 
JSR 
CLR 
MOV 
.REPT 
ROL 
ROL 
.ENDR 
BIC 
MOV 
MOV 
JSR 
MOV 
MOV 
MOV 
CMP 
BEQ 
MOV 





M7 
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CAPMEMN - COMPARE MEMORY TO BACKGROUND PATTERN 

010137 002240 
010337 002232 
tT td 

701 


062704 
7 


Ri .ERRL ,ERRLO sS4VE LOW ORDER 
RB sSAVE EXPD FOR REPORT 
cha}, REC sSAVE RECV FOR ERROR REPORT 


e 
$2,R1 sUPDATE NON PAR6 ADDRESS 
RO sMAKE IT DOUBLE PRECISION ADD 
62,.R4 }UPDATE PAR FORMAT ADDRESS 
nae sEND iF PAR6 MAPPING AREA? 

i 
220000 ,R4 sBACKUP INTO PAR6 MAPPING BEGIN 
$200, @9KIPAR6 | POINT TO NEXT 4K BLOCK >28K. 
@OKIPARG,KTFLG END OF MEMORY? 


pet len 
PC. KTOFF ; OFF MEMORY MAPPING 
SET FAILURE 


608 
PC. KTOFF TURN OFF MEMORY MAPPING 
}SET SUCCESS 


160000 


000200 
172354 
017354 


017354 


rn 


PC 
-SBTTL REGSAV - SAVE R1-RS ON STACK 
| hd 


}ROUTINE TO 
}SAVE Ri THROUGH RS ON THE STACK 


}CALLING SEQUENCE: 
JSR —s RS, REGSAV 


STHIS ZS A COOROUT TRANSFER CONTROL BACK T 


INE WHICH 
sTHE CALLING ROUTINE lam te has conte te INE, 
incest RETURNS CONTROL TO THIS ROUTINE TO RESTORE 


; THIS ROUTINE SHOULD ONLY BE CALLED FROM ROUTINES WHICH ARE 
sCALLED VIA A JSR PC INSTRUCTION 

3 

g° 

REGSAV: 


EEE PEELE E, 


2520 
sace 
2524 
2526 
2527 
2528 
$380 
23531 
23532 
2533 
2534 
2535 
2537 
2536 
2540 
3 
254 

254s 
2345S 
2547 
3345 
2531 
2532 
2533 


D 
a 
wn 
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.SBTTL GETPAT - GET 8 BIT PATTERN FROM OPERATOR 
}ROUTINE TO REQUEST AN 8 BIT DATA PATTERN FROM THE OPERATOR 
FINPUTS: NONE . 
SOUTPUTS: 
: RO OCTAL NUMBER FROM THE OPERATOR 


CALLING SEQUENCE: 
' JSR PC,GETPAT 


cE 


GETPAT: : 
SA THE GENERAL REGISTERS 


SAVE 
1s: GMANID DATASC,PATDAT,0,$77.0,377.NO 
C$GMAN 


sRETRY IF ERROR 
DATA PATTERN FROM OPERATOR 
IRETURN TO CALLER 

ILOCAL DATA AREA 

t- 


PATDAT: .WORD 0 TEMPORARY STORAGE FOR DATA 
116 124 DATASC: [ASCIZ ‘ENTER DATA PATTERN’ 
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GETSEL - ISSUE MENU AND GET OPERATOR RESPONSE 
oa8e — GETSEL - ISSUE MENU AND GET OPERATOR RESPONSE 
Sees sROUTINE TO ISSUE A MENU AND GET THE OPERATOR'S RESPONSE. 


SEQ 0092 


° 
s INPUTS: 

S389 ; RO ADDRESS OF ASCIZ STRING OF MENU 
2588 ' Ri MAXIMUM ALLOWABLE OPERATOR RESPONSE 
258 . 
2590 sOUTPUTS: 
2591 ; RO NUMBER OF THE OPERATOR'S SELECTION 
$398 020336 bETSEL: : 
2594 020336 SAVREG sSAVE GENERAL REGISTERS 
2595 020342 910002 MOV RO,R2 sSAVE THE MENU ADDRESS 
2596 020344 01020 1$: MOV Ra ,R3 sSTART OF MENU STRING 
2597 020346 005713 28: TST $) sEND OF ASCII ? 
2598 020350 001412 BEQ $ sBRANCH IF ALL LINES DISPLAYED 
2599 020352 PRINTF @SELASC,(R3)+  ;DISPLAY THE MENU 

020352 012346 MOV (R3)+,-CSP) 

020354 012746 020522 MOV - 

020360 012746 000002 MOV #2. 5 

020364 010600 MOV 

020 104417 TRAP CSPNTF 

020370 062706 000006 ADD 66,SP 
2600 020374 000764 BR 24 
2601 020376 3%: MENASC ,MENRES,D,-1,0,-1,NO 

020376 104443 RAP C4GMAN 

020400 000406 BR 100014 

020402 020556 WORD MENRES 

020404 000042 “WORD TSCODE 

020406 020527 “WORD MENASC 

020410 177777 [WORD -1 

020412 000000 “WORD T$LOLIM 

020414 177777 [WORD TSHILIM 

020416 10001$: 
2602 020416 BNCOMPLETE 18 sRETRY IF ERROR 

020416 103352 Bcc 1% 
2603 020420 013700 020556 MOV MENRES RO :GET THE OPERATOR'S REPLY 
2604 020424 020001 CMP RO,R1 sCOMPARE TO MAXIMUM ALLOWED 
2605 020426 101411 BLOS 53 :BRANCH IF OK 
2606 020430 PRINTF @MENERR sDISPLAY ERROR MESSAGE 

020430 012746 020454 MOV OMENERR, - 

020434 012746 000001 MOV #3. -(SP 5 

020440 010600 MOV RO 

020442 104417 TRAP CSPNTF 

020444 062706 000004 ADD $4,SP 
2607 020450 000735 BR i$ sRETRY - 
2608 020452 000207 S$: RTS PC ;RETURN TO CALLER 
2609 020454 045 116 045 MENERR: .ASCIZ ‘SNSA eee Menu Selection Too Large ee’ 

020522 045 116 045 SELASC: :ASCIZ ‘sNsT’ 
2611 020527 105 156 164 MENASC: :ASCIZ ‘Enter Menu Selection: ' 
2613 020556 000000 MENRES : .WORD 0 
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020614 


116 


-SBTTL CHKMAN - CHECK MANUAL INTERVENTION LEGALITY 


t¢ 


}ROUTINE TO TEST FOR MANUAL INTERVENTION LEGALITY. 


’ 
s INPUT: 
; NONE . 


}OUTPUT: 
: CARRY r@) 
3 a 


iSIDE EFFECTS: 


1s: PC 


045 NOMAN: .ASCIZ ‘SNA eee Manuel Intervention not Allowed - Test Aborted +’ 
even 


NOT 


ION ALLOWED 
ERVENTION IS OK 


A MESSAGE IS DISPLAYED WARNING THAT TEST IS 
how EXECUTED IF MANUAL INT NOT 


ERVENTION IS 


sSAVE THE REGISTERS 
sSEE IF MANUAL INTERVENTION OK 


sBRANCH IF ALLOWED 
sPRINT THE WARNING MESSAGE 


AR CARRY FOR ERROR 
i RETURN 


SEQ 0093 
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ENVIRN - SETUP FREE DIAGNOSTIC SPACE 
-SBTTL ENVIRN - SETUP FREE DIAGNOSTIC SPACE 
; SUBROUTINE TO SET-UP VARIOUS ENVIRONMENTAL PARAMETERS. 
énvirn: MEMORY 
s GET 1ST FREE ADDRESS... 
3...AND WORD COUNT. 


+ EMER CoE "Bem er 


sGET a Oa ADORESS 
: NT T T FREE ADDRESS 
; STORE LAST FREE ADDRESS 


§SSSSSSSSS SSSSSSSSSSSSSSESSSSSSSSESSSSSSSSSSS 


eS 
ay ago IT 


rOID Gio aT PE SL ose 
et The 


T23A 

#170000 ,L $HIME  SEPERVISOR *GouLD BE WRONG 
1BR 40¢ FOR RELEASE 

| a sT THE SYSTEM TYPE 

T238 


ResASES Hess S seo onal ESeSs 


ow 
a8 


une 


THE FLAG 
+ 40% FOR RELEASE 
PRINTF #16189 s1cLL THE SYSTEM TYPE 
Ss PC sRETURN 
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SEQ 0095 
KTINIT - SETUP KT11 MEMORY MANAGEMENT REGISTERS 
2690 .SBTTL KTINIT - SETUP KT11 MEMORY MANAGEMENT REGISTERS 
3° 
see 3 
$633 sROUTINE TO INIT KT-11 
. 
2695 .- 
$$3 021070 KTINIT: 
2698 021070 005037 003132 CLR KTFLG 3 INIT >26K MEMORY FLAG 
2699 021074 005037 003134 cLR KTENABLE ' T TEST >28K FLAG 
2700 021100 023727 002120 001577 CHP L¢HIME , 61577 ' ENOUGH MEMORY (>28K)? 
2701 021106 101444 BLOS 6s «98 s NO. 
021110 013700 000004 MOV @OERRVEC RO 3 SAVE OLD ERR VEC PTR. 
270 021114 012737 02 000004 MOV $24 , AOERRVEC 3 SET ERR VEC PTR. 
704 021 737 $94895 TST aesRo 3 GOT KT12? 
705 O21 NOP + (TRAP IF NO). 
706 021130 013 002120 003132 MOV LSHIME,KTFLG ; YES. SET KT FLAG. 
2707 021136 042 000177 003132 BIC 77 , KTFLG 1 
2708 021144 010037 MOV ; 3 RESTORE OLD FRR VEC PTR. 
2709 021150 CLR ; RO = AR DATP. 
2710 021152 012701 172340 MOV @KIPARO,R1 i Rl KI REGS 
2711 021156 012761 406 177740 18: MOV 677406,-40(R1) ; DESCRIPTOR REG 
2718 021164 010021 mov RO CRS 3 SET KIPAR REG. 
2713 021166 062700 000200 6260 ; BUMP AR DATA BY “4K~. 
2714 021172 020027 002000 CMP RO, #2000 3 AT “I/0"? 
2715 021176 001367 BNE 1% + NO. 
2716 O02 012741 177600 MOV $177600,-(R1) ; YES. SET KTPAR7 FOR 1/0. 
2717 02 000405 BR 9 
2719 02 012716 021214 2%: MoV 06% ,(SP) 3 SET we RETURN 
2720 021212 RTI ; RTI TO NEXT LOCATION 
2728 021214 010037 000004 64: MOV RO, QPERRVEC ; RESTORE OLD ERR VEC PTR. 
2724 021220 000207 9%: RTS PC 
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SUBROUTINE TO SET EXTENDED FEATURES SWITCH 
Requires thet SOFINIT end WRTCHR heve been done previous to cell. 


RS CURRENT UNIT NUMBER 
sOUTPUTS: 


3 The Extended Features Switch is set. 
3 
ge 


INVERT; : 


~ 
wn 
be | 


EXTFEA 
#100206 , CHDPKT 
OUSMBK , CHDPKT «2 
66 6 
#100010, WSHEK 


OCMDPKT 
oe »WRTCHR 


333835 


D 
4 
wn 


PACKET. 
<,°3>€177774 sMUST BE ON MOD 4 BOUNDRY. 
31ST WORD IS TSOS C 


OMMAND . 
s2ND WORD IS THE BUFFER LOW ADDRESS. 
13RD IS THE BUFFER HIGH ADDRESS. 

34TH WORD IS THE BYTE/RECORD/FILE COUNT. 


i WRITE SUB-SYSTEM MEMORY CHARACTERISTIC BLOCK. 


USMEK:: 0 1ST WORD:: SEL 0 
<i S2ND WORD: : 2 


8 WORD: : 
EVEN 


SUBROUTINE TO CHECK WETHER OR NOT WE'LL TEST NXM 
: 
S: 


The NXMFLG is set if we can test. 
The NXMLO end NXMHI eddresses ere setup. 


eee 


2775 
2776 021312 
2778 021312 snynes + THE tenRe 
R 
R 


2779 021316 iGLEAG 
2760 021322 on THe feet ADDRESS LO 
2761 021 THE TEST ADDRESS HI 


CL NXMHI 
2762 0215 TST fs" it A 11/238? 





2763 021336 
2 340 
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013701 
062701 


042701 
010102 
000006 
010137 
000012 


042702 
010237 
000207 
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002120 007777 
021466 
003144 
005777 
003777 


001577 


003142 


002120 
000200 
000177 


003140 


177700 
003142 


BEQ@ i$ 3NO 
CMP L $HIME , 07777 ; GREATER THAN 128K 
BLO 2s + NO 
JSR PC .NXMTST sSETUP THE ADDRESS 
BR 134 3SET THE FLAG AND EXIT 
1s: tst 123A 1IS IT A 11/2302 
2$: CMP L$HIME , 05777 :GREATER THAN 
BHI 14$ sYES,23A/238 WITH 128K 
CMP L$HIME , 03777 :GREATER THAN 64K BUT LESS THAN 92K? 
BLO 43 NO 24K 
JSR PC .NXMTST ' ADDRESS 
BR 133 3SET THE FLAG AND EXIT 
4$: CMP L $HIME , 61577 iGREATER THAN 24K BUT LESS THAN 64K? 
BLO 14 :NO, TELL THEM AND EXIT WITH FLAG CLEAR 
JSR PC ,NXMTST sSETUP THE ADDRESS 
ADD 077 3FOOL THE 11/02 & 117/03 
13%: INC NXMELG 1SET THE FLAG 
BR 15% T 
14%: BR 153 iNOP FOR PRINTOUT 
PRINTF sTELL THEM & EXIT ##eNO PRINTeeeese 
MOV @NOMEM, -( SP) 
MOV #1,-(SP) 
MOV SP; RO 
TRAP C$PNTF 
ADD 64,SP 
15$: RTS ;RETURN 
te 
3 SUBROUTINE TO SETUP THE NXM ADDRESS FOR TESTING 
i" 
3 OUTPUTS : NXMLO, NXMHI ;SETUP WITH NXM ADDRESS 
] 
t- 
NXMTST: MOV L SHINE. R1 :GET TOP OF MEMORY 
ADD $ sMAKE IT I/0 BLOCK OR OTHER NXM 
BIC 0177 Ri 
MOV R1,R2 ;RESAVE RESULTS 
.REPT 6 
ASL R1 ;PUT IN PLACE FOR XFER 
HOV Mi Ra »NXMLO sSAVE TEST ADDRESS LOW 
ASR sPUT IN PLACE FOR XFER 
BIC $177700,R2 ;DON‘'T WANT ILA! 
MOV R2,NXMHI sSAVE TEST ADDRESS HIGH 
RTS PC sRETURN 
ENDMOD 


SEQ 0097 


H8 
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KTINIT - SETUP KT11 MEMORY MANAGEMENT REGISTERS 


H -TITLE TSV4 - MISCELLANEOUS SECTIONS 
9 021562 BGNMOD TSV4 
021562 TSV4:: 
10 
16 
is 
19 .SBTTL PROTECTION TABLE 
20 021562 T 
021562 L$PROT:: 
21 021562 177777 %4177777 +«#177777 «WORD -1, -1, -1, -1 sNO DEVICE PROTECTION REQUIRED. 
22 021572 ENDPROT 





002224 


000035 


000037 


002176 


002012 


003176 
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INITIALIZE SECTION 


SEQ 0099 
-SBTTL INITIALIZE SECTION 


i THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED 
sAT THE BEGINNING EACH PASS. 


HIF “START” OR “RESTART”, SET onyiex- PASS FLAG AND BUS-INIT. 
sIF “CONTINUE”, NOTHING iS REQUIRED. 
3 


INSERT TEMPORARY JUMP TO ODT 
ge 


BGNINIT 
L$INIT:: 
40$: CLR EXTFEA 
CLR NXMFLG 
MOV #EPRT1,EPRTSW ;SET UP PRIMARY MESSAGE FOR REPLACEMENT 
CLR SIFLAG ;CLEAR “SOFT INIT” FLAG 
CLR KTENABLE }CLEAR TEST ABOVE 28K FLAG 
CLR RAMSIZ ;CLEAR RAM SIZE FOR RAMERR ROUTINE 
READEF 9€F .CONTI 
EF . CONTINUE ,RO 
C$REFG 
errr 1$ 
Cre UNITN, »LSUNIT UNIT IN RANGE? 
TST DUFLG }DROPPED UNIT? 
BMI NXTU i8R IF YES 
MOV UNITN,R1 
ASL 1 
TST ERTABL(R1) 
BEQ SETU 
BIT e617 14, ERTABL (RI) sDROPPED? 
BNE NXTU 
EXIT INIT :D0 NOTHING IF “CONTINUE”. 
TRAP C$EXIT 
.WORD 110030- 
1s: READEF NEW 
MOV “NEW, RO 
TRAP $REFG 
BNCOMPLETE NXTU ; TAKE NEXT UNIT IF NOT NEW PASS. 
Bcc NXTU 
READEF 9€F .START 
MOV GEF .START,RO 
TRAP _C$REFG 
BCOMPLETE 2¢ 
BCS 24 
READEF OEF RESTART me 
TRAP echer 
BNCOMPLETE 31% 
Bcc 31% 
24: 31ST PASS, BUS-INIT... 
;BUS RESET. 


BRESET 
TRAP C#RESET 


J8 
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114 022144 


2001 
010137 


002212 
002220 
003144 
003146 


177777 


002012 
002216 


000100 
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000001 


31$: 


NXTU: 


11$: 
PASRPT: 


10$: 
SETU: 


CLR TSTCNT 
CLR FATFLG 
CLR T23A 
CLR 7238 
MOV 0340, -(SP) 
MOV $20$. -(SP) 
JMP 0.00T 
CLR SKIPT 
MOV #-1,QVvP 
JSR PC, ENVI 
JSR PC‘ KTINIT 
MOV @ERTABL, 
CLR (RO)- 
CMP RO, @ERTABE 
BLO 303 
BR re 
CLR ave 
oMe PASRPT 

: MOV #-1,UNITN 
CLR ¢NT 
BREAK 
TRAP  C$BRK 
INC UNITN 
CMP UNITN,L$UNIT 
BLO SETU 
MOV $-1,0UFLG 
BR 11$ 
DOCLN 
TRAP C$DCLN 
NOP 
CMP LSUNIT, #1 
BLOS §§ NEWPAS 
TST DEVCNT 
BEQ NEWPAS 
RFLAGS RO 
TRAP Cé$RFLA 
BIT #ISR,RO 
BNE AS 
DORPT 
TRAP  C$DRPT 
BR AS 
GPHARD UNITN,RO 
MOV UNITN, RO 
TRAP (C$ 
BNCOMPLETE NXTU 
Bcc NXTU 
CLR DUFLG 
INC DEVCNT 
MOV (RO)+,R1 
MOV R1,CSRADOR 


ep TESTS RUN IN PASS 
COUNT 


gee tee 
EAR fI/23A FLAG 
;CLEAR 11/238 FLAG 


aa TO DEBUGGER 


HE 
EAR THE SUBTEST “SKIPPER” 


s...QUICK VERIFY... 

sSET_ENVI . 

sINITIALIZE KT MEMORY MANAGEMENT 
sCLEAR THE ERROR TABLE 


3GO REPORT THE STATUS 


sINIT UNIT NUMBER.. 
sCLEAR COUNT OF DEVICES RUNNING 


s...AND SET NEXT UNIT NUMBER. 


sABORT, NO MORE UNITS. 


sHOW MANY UNITS SELECTED? 
iBR IF ONLY 

sARE ANY STILL RUNNING? 
38R IF NO 


sSHOULD WE PRINT STATISTICS 
s6R IF NO 


sGET UNIT N P-TABLE POINTER. 


sBR IF UNIT NOT AVAILABLE. 
sCLEAR “DROPPED” FLAG. 
sGET 1ST REGISTER ADDRESS. 


sADDRESS OF REGISTERS OF UNIT UNDER TEST 





SEQ 0100 


K8 
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SEQ@ 0101 
INITIALIZE SECTION 


012001 MOV sGET VECTOR ADDRESS. 

sMOV sGET INTERRUPT PRIORITY 

sMOV sSET INTERRUPT PRIORITY. 

010137 002206 MOV sSET INTERRUPT VECTOR POINTER... 
012721 MOV s...VECTOR... 
013721 MOV s...AND PRIORITY. 
TST 
BEQ 


31ST PASS ?? 
sNO, SKIP THE PASS 1 STUFF. 


:AST PASS, CHECK THAT DEVICE ADDRESSES ARE VALID, AND 
sTHAT THE DISPLAY STATUS IS PROPERLY INITIALIZED. 


013701 ; UNITN,R1 
00630 Ri 


$61T15,ERTABL(R1) 1SAY DEVICE. RUNNT 

EXTA EAR ERROR EXTENSION FLAG. 
1 ARE We TESTING MULTIPLE UNITS? 
PES "GET OPERATOR FLAGS. 
;SHOULD WE PRINT UNIT 0? 


18R IF NOT. 
sPRINT THE UNIT @ 


SS OF FIRST REGISTER 
STERS 


s ADORE: 
sSTART OF REGIS 


sADDRESS OF TSSR REGISTER 
sTEST BOTH CONTROLLER REGISTERS... 
...AND BR IF ALL OK. 
R1,NODEV }FLAG DEVICE AS NON-EXISTENT 
ma @-i,0UFLG ;OROP THIS UNIT. 
: 


IFINALLY, SET CPU PRIORITY AND WE'RE DONE. 

5s, SETPRI #PRIOO ENABLE INTERRUPTS. 
MOV. @PR 

L10030: 


045 PUNIT: .ASCIZ /sSNSNSAeeeee TESTING UNIT SD28A eeees/ 





L8 
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ADD AND DROP UNITS SECTIONS 


166 

167 022366 

168 022366 

169 022370 
100000 
040000 
022434 
000002 


140000 
000240 


003176 
003176 


003112 


003176 
000240 


-SBTTL ADD AND DROP UNITS SECTIONS 


; THE ADD-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
s TO BE (A) ADDED TO THE TEST LIST FOR THE FIRST TIME 

i OR (B) RE-INSERTED IF IT HAD BEEN PREVIOUSLY DROPPED. 
geo 


LSAU:: 
RO,R1 GET “a TO BE ADDED (RO) 
Ri MAKE IT A WORD INDEX 
#100000 ,ERTABL(R1) SET THE “ACTIVE” BI 
€40000, ERTABL(R1) CLEAR THE “DROPPED” BIT 


1$: 


s UNUSED. 
L10031: 


THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
TO BE REMOVED FROM THE TEST LIST. 


THIS IS JUST TO TELL THE MAN. 
TED ON OPERATOR “STA” OR 
THE “DISPLAY” COMMAND 


S ARE RE-SELEC 
REMAIN INACTIVE. 
UNITS, AND THE P-TABLES OF THOSE 


id 

o 

3 

* SUPVSR DOES THE “DROPPING*. 
; 

$ 

; AINS THE UNIT TO BE DROPPED. 


#-1,DUFLG 
RO,R1 


Bess 


1 
#140000 ,ERTABL(R1) s SAY DROPPED 
240 s 22222227? 


a 
3 


23333 


BE 


L10032-2- ° 





M8 
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SEQ 0103 
ADD AND DROP UNITS SECTIONS 


045 116 O45 1: -ASCIZ /SNSA UNIT #D8A DROPPED/ 


L10032: 
RAP Csou 
3 2e 


s AUTO-DROP CODE SECTION. 


OT caren 

* sPOINT v9 DEVICE REGISTER 
sENOUGH TIME FOR 2400' REEL TO REWIND 
iWAIT FOR SSR TO SET 


Lene WHEN SSR IS SET 
sWAIT FOR .25 SECONDS 


10$: 


sBUMP COUNTER DOWN 
sKEEP GOING 
sTRY AND DROP UNIT 


UNUSED. 


208: 
L10033: 


: BRAArAng SE SPueeS 


a 
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CLEAN-UP AND REPORT CODING SECTIONS 
, -SBTTL CLEAN-UP AND REPORT CODING SECTIONS 


; THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS 
; EXECUTED AT THE END OF EACH PASS coR OR SUB-PASS) 

3 USE TO RETURN DEVICE UNDER TEST TO A NEUTRAL STATE. 
A. 


LSCLEAN:: 
CSRADOR RS POINT TO DEVICE REGISTER 
TST  OUFLG s“orgpped FLAG IS. SET ON. 
eMI sss . AND GROSS CONTROLLER FAULT... 
I: "DON'T TRY TO XCT CLEANUP CODE. 


£0. TSSRCRS) 300 SOFT INIT 

PC WAIT 

1%: 

2t: 

L10034; 

gee 

3 THE REPORT CODING SECTION CONTAINS THE 

3 “PRINTS” CALLS THAT GENERATE STATISTICAL REPORTS. 


LSRPT:: 


CSCLEAN 


bee 
ee 
oe 


TABLE ENTRY € TEST IT. 
UNIT NOT RUN 


WAS CROPPED? 


Bip com ves 


pty Rat MARDER TABLE. 


WAS T NON-EXISTENT? 
BR NO 


4 








B9 
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SEQ 0105 
CLEAN-UP AND REPORT CODING SECTIONS 


023016 012746 000002 MOV .-(SP) 
023022 010600 MOV He RO 
023024 104416 TRAP CSPNTS 
023026 062706 000006 ADD 66 ,SP 
234 023032 000433 BR ag 
023034 160001 3%: CMP R2, #160001 : WAS UNIT NOT READY AT STARTUP? 
023040 001012 BNE 304 ; BR IF NO. 
257 023042 PRINTS #@DEVNRD,RS 
023042 010346 MOV R3,-(SP) 
023044 012746 023331 MOV @DEVNAD, -(SP) 
023050 012746 MOV #2,-(SP) 
023054 01 MOV SP. RO 
023056 104416 TRAP CéSPNTS 
023060 706 000006 ADD SP 
258 023064 000414 BR 
023066 042702 170000 30%: BIC 6107777, 
260 023072 PRINTS R2 
023072 01 MOV R2.-(SP) 
023074 010346 MOV R3,-(SP) 
023076 012746 023412 MOV -(SP) 
023102 012746 MOV 63,-(SP) 
3106 01 MOV RO 
023110 104416 TRAP Cé#PNTS 
023112 062706 000010 ADD #10,SP 
261 023116 062704 000002 4$: ADO ge .Ra 
023122 3 INC R 
124 020427 003376 che R4, SERTABE 
264 023130 103701 BLO 
265 023132 012604 MOV SP)+,.R4 
023134 012603 MOV SP)+.R3 
267 023136 012602 MOV SP)-, 
268 023140 ENDRPT ‘ 
0231 L10035: 
023140 104425 TRAP C$RPT 
270 023142 045 116 045 DEVSUM: -ASCIZ /SNSADEVICE STATUS SUMMARY: sN/ 
271 023177 045 101 040 DEVONL: .ASCIZ /sA UNIT SD3SA ONLINE, ERRORS = sDsN/ 
272 023247 045 101 040 DEVNXR: :ASCIZ /s#A UNIT SD38A DROPPED, NON-EXISTENT REGISTERSN/ 
273 023331 045 101 040 DEVNRD: :ASCIZ /s#A UNIT SD38A DROPPED. NOT READY AT STARTUPSN/ 
274 023412 045 101 040 DEVDRO: -ASCIZ /8A UNIT SD38A DROPPED, ERRORS = sDsiN/ 
276 
277 023462 ENDMOD 
278 
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CLEAN-UP AND REPORT CODING SECTIONS 
-TITLE TSVSA - HARDWARE TESTS 


BGNMOD TSVS 
TSVS:: 


-SBTTL TEST 1: BUS RESET TEST 


THIS TEST VERIFIES THAT THE M7196 MODUL 

ee ON THE Se Mp! 3 Panties 
BUILT-IN TIALI a Bey 

ANY onsite PROBLEMS IN OTHE HO 

SELF -TES is 


C S_OF TSSR AS 
LISTING THE EXPECTED DATA, 

THE ERROR cet THE T 
REPORTS ONE THREE POSSIBILITIES: 


% F CONTENTS ARE AMBIGUOUS CANY OF BITS 11-14 10 SET, 


APPARENT ERROR CODE IN BITS 0-9), INDICATES THAT THE 
TSSR_ CONTENT Oe 


ED IN ORDER TO PROBE F 


= Ranta i7- a oe IS A RF AT ACS an ERNOR. THE ERROR z 


CODE I S DE AND THE APPROPRI TATE sama ataa GIVEN. 
FNDICATES THAT A *SERIOUS PROBLEM EXISTS 


25 
26 
e7? 
268 
$0 
31 
33 
34 
35 
36 
37 
38 
39 
40 
al 
ri 
44 
45 
46 
47 
48 
4G 
so 
Si 
33 
S4 
3S 
S& 
S7 
38 
39 
60 
62 


oa 
uw 


Ti:: 
#TST1ID,RO ASCII MESSAGE TO IDENTIFY TEST 
PC, TSTSETUP {00 INITIAL TEST 
$20. ,LOOPCNT sPERFORM 20 ITERATIONS 
;USE R3 AS FATAL ERROR FLAG 
GAAAAAAGAAGS SUBTEST ///////4/44474 
, NS 


TRAP C#BSUB 
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TSERCRS), Ri 


Ste <RIADOR!0FL> R2 


lok 


ERRNO , SFHERR , SFFMSG 


sISSUE A BUS RESET 
TRAP CSRESET 


Veet THE CONTENTS OF TSSR 

sCONTENTS OF TSR BE SET 

sREADY AMD NEW DATA SHOULD BE SET 
IF COMPARE 


sBR. 
;REPORT A FATAL ERROR 


TRAP CSEROF 
. WORD 01 


- WORD HERR 
.WORD SFFMSG 
sSET THE FATAL ERROR FLAG 


sNNNANANANAANN END SUBTEST NANANANAAAAAN 
L10037 


* TRAP ss CHESUB 


sDID WE HAVE FATAL ERROR ? 
sBRANCH IF NOT 

:G0 DROP THIS UNIT, pith ALLOWED 
;RESET FATAL ERROR FLAG 


B4ASITASATSSS | Otte LA 
. : 


TRAP C#BSUB 


werre TO ISSUE 4 SOFT RESET 
sWAIT FOR stem TS5 


sSET THE ERROR FLAG 
s\\NANAAANANANN END gigrest NVASANAAAAAANSN 
Li : 
TRAP CsESuB 


sFATAL ERROR DETECTED ? 

8 

8 IME TO DROP UNIT 

sSHOULD WE DO ITERATIONS ? 
sBRANCA 

sLOOP It EXPIRED 





EQS 
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TEST 1: BUS RESET TEST 


124 0236 
O23654 104432 
023656 000022 


40%: TST sALL DONE THIS TEST 


;LOCAL TEXT MESSAGES FOR TEST 
3- 


023660 111 156 TST1ID: .ASCIZ ‘Initielizetion’ 
023700 énwrer 

023700 

023700 104401 


aangl 


| anlent 


-SBTTL TEST 2: WRAP DATA - HIGH BYTE 
THIS TEST VERIFIES OPERATION OF: 


* Pie oft ab teract bit ote pete 


BYTES), PART rr. ver ciacuite CADORESS 
DECODER, BDAL tiGH InANSCeT OF FO INTERNAL DAL BUS 
DRIVERS), AND Baste VERS, HIgH BY 1/0 CONTROL SEQUENCES 


REGISTER 2B ROTATE AND NEGATE FUNCTIONS, Speer tit 


Y AND SOURCE BUSES; 
BASIC MICROPROGRAM SEQUENCES. 


Bakbsssseteued KSEE 


MB°RSTEs 


~~ 
on 
wn 


nat 5, Seite" fest en 


sista 


@-1 RS 
R3 
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eR 
JSR 


TEST 2: WRAP DATA - HIGH BYTE 


016054 


ig 
PC, SOF INIT 
108 


RO,R1 
ERRNO, SFIERR , SFIMSG 


sFORCE SOFT INIT ON NEXT PASS 
;CLEAR FATAL ERROR FLAG 


$>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C$BSEG 
sSET MAINT MODE + WRITE DATA 
1BR IF CARRY SET (GOOD RETURN) 
8 
eave” ENTS OF Foon 
sDATA THAT WAS WRITTEN 
sDEVICE FATAL SSR FAILED TO SET 
TRAP 
-WORD 
~WORD 
. WORD 
sFORCE SOFT INIT ON NEXT PASS 
sSET FATAL ERROR FLAG 
sLOOP ON ERROR, IF FLAG 1 


sWAS ca ERROR RECEIVED ? 
BRANCH z NOT 


CsCLP1 


3 BUT LOW 2 BITS 
;81TS 6 AND 9 HAVE LOW DATA BITS 
; THESE BITS MUST BE SET ALSO 
ENTS OF TSSR 
OFF LING IN EXBECTED DATA 
{DOES EXPECTED MATCH RECEIVED ? 
sOKAY IF MATCH 
3sTSSR WASN'T CORRECT 
TRAP 
> WORD 
sFORCE SOFT INIT ON NEXT PASS 
sLOOP ON ERROR ? me 
sGET TSBA REGISTER CONTENTS 


{DATA PATTERN WRITTEN 
INTO TOP BYT 


sMOVE BYTE 
3;80TH HALVES A 
sCOMPARE EXPECTED TO RECEIVED 
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TEST 2: WRAP DATA - HIGH BYTE 
001405 


zs3 


024231 123 

024276 116 157 
127 162 

024376 

024376 

024376 104401 


RERARESIES = PUVURNASSEE BEBE 


. 


foro fot 
RRR 


Wy 
b> 


PERE 


102 
123 
040 
141 


SE@ 0110 


BEG 35% sERROR IF NOT EQUAL 
ERRHRD ERRNO, T2TSBA,EXPREC sPRINT THE ERROR & EXPD/RECV 
TRAP CSERHRD 
«WORD 204 
- WORD T2TSBA 
. WORD c 
INC R3 sFORCE SOFT INIT ON NEXT PASS 
35%: ENDSEG 3<<<<¢¢¢<¢¢¢<000<¢ END SEGMENT <<ceeeeeeeeece 
10000$: 
TRAP CSESEG 
INCB R4 sNEXT DATA PATTERN TO TEST 
BNE S$ sBRANCH TILL BACK TO ZERO 
JSR PC, TSTLOOP sSHOULD WE DO ITERATIONS ? 
BCC ; sBR IF NOT 
JP T2L00P sLOOP UNTIL COUNT EXPIRED 
40%: EXIT TST sALL DONE THIS TEST 
TRAP CsEXIT 
-WORD L10041-. 
| iad 
sLOCAL TEXT MESSAGES FOR TEST 
ge 
T2TSBA: .ASCIZ ‘TSBA Incorrect After TSOB High Write’ 
eTsens “ASCIZ ‘TSSR Incorrect After TSDB High Write’ 
T2SSR: .ASCIZ ‘No Sub-System aoey After T High Write’ 
TST2ID: :ASCIZ ‘Wrap Dete - High Byte’ 
.EVEN 
ENDTST 
L10041: 
TRAP CsETST 


-SBTTL TEST 3: WRAP DATA - LOW BYTE 


THIS TEST FURTHER VERIFIES OPERATION OF MANY OF THE SAME 
ELEMENTS TESTED IN TEST 2, AND ADDITIONALLY VERIFIES: 


1. LOW BYTE OF THE TSDB INPUT FILE REGISTER, 


2. LOW BYTE OF INTERNAL DAL BUS DRIVERS ON THE DCOOS 
TRANSCEIVER CIRCUITS, 


3. BASIC FUNCTIONING OF PARTS OF THE RAM. 


THE PROGRAM WRITES A TEST DATA BYTE INTO 
WAITS FOR THE SSR BIT IN TSSR TO SET, THEN 
OF BOTH TSBA AND TSSR. GorH Brits OF 5 


LOW BYTE OF TSDB 
a CKS oo § 
DATA WRITTEN APPEARS IN BOTH BYTES TSpa AND THE 

OF TSSR IS 


a" 
H 
a 
Zok 
2 
tH 
w 
o-% 
> 


DESCRI SIS GI 
IF A DISCREPANCY IN TSBA OR TSSR IS DETECTED. THE ANALYSIS 


H9 


TSVSA - HARDWARE TESTS MACRO VOS.03 Tuesday 28-Apr-87 10:28 Page 85-5 
TEST 3: WRAP DATA - LOW BYTE 


261 
262 
283 
264 


002220 


000000 
016330 


T3LOOP: 
S$: 


10$: 


15%: 


20%: 


25%: 


LISTS LIKELY FAULTY CANDIDATES FROM THE LOGIC ELEMENTS LISTED 
OVE. THE TEST IS REPEATED FOR ALL COMBINATIONS OF TEST DATA 
BYTES (0-377 OCTAL). 


BGNTST 


#TST3ID,RO 
PC, TSTSETUP 
$20. , LOOPCNT 


#1,R3 


RO,R1 
ERRNO, SFIERR, SFIMSG 


R3 
FATFLG 


AS T3SSR,EXPREC 


R3 : 
FATFLG 

FATFLG 

20% 

R4-R2 
ré<BITO!BIT1>,R2 
@SSR!NBA,R2 
TSSR(RS).R1 

OOFL RI 

R2 + ta 

ERRNO, T3TSSR,EXPREC 


T3:: 
O IDENTIFY TEST 
TUP 


TA_PATT 


sFORCE INIT ON NEXT PASS 
;CLEAR FATAL ERROR FLAG 


3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP 


C#BSEG 
sSET MAINT MODE + WRITE DATA 
sWAIT FOR SSR TO SET 
sBR IF CARRY SET (GOOD RETURN) 
sSAVE CONTENTS OF TSSR 
sDATA THAT WAS WRITTEN 
sDEVICE FATAL SSR FAILED TO SET 
TRAP CSEROF 
. WORD 
- WORD ish. 
sFORCE INIT ON NEXT PASS 
sSET THE FATAL ERROR FLAG 
sLOOP ON ERROR, IF FLAG 4 
TRAP CsCLP1 


sDID WE FF not ERROR ? 


sBRANCH IF 

sOROP UNIT DROP ALLOWED 
sDATA PATTERN. WRITTEN 

:CLEAR ALL BUT LOW 2 BITS 

:81TS 8 AND 9 HAVE LOW DATA BITS 
sTHESE BITS MUST BE SET ALSO 
:GET THE CONTENTS OF TSSR 

31S DRIVE OFF-LINE 


sBR NOT OFFLINE 
1SET OFF-LINE IN EXPECTED 
sD0ES ae MATCH RECEIVED ? 
qe IF MATCH 
sTSSR WASN'T CORRECT 


TRAP C#ERHRD 


SEQ 0111 
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SEQ 0112 
TEST 3: WRAP DATA - LOW BYTE 
024572 000457 .WORD 303 
024574 024726 “WORD T3TSSR 
024576 015554 .WORD €EXPREC 
339 024600 005203 an INC op R3 ‘FORCE oN ON NEXT PASS 
340 8 ] ERROR 
hsprted 104406 TRAP C$CLP1 
341 024604 016501 000000 MOV TSBACRS),R1 :GET TSBA REGISTER CONTENTS 
024610 005902 CLR R2 ; 
343 024612 150402 BISB R4,R2 ;DATA PATTERN WRITTEN 
024614 000302 SWAB sMOVE INTO TOP BYTE 
345 024616 150402 BISB R4,R2 ;BOTH HALVES SHOUL 
024620 020102 CMP 1,R2 sCOMPARE EXPECTED TO RECEIVED 
347 024622 001405 BEQ 353 ;8R IF ERROR NOT EQUAL 
351 024624 ERRHRD ERRNO, T3TSBA,EXPREC ;PRINT THE ERROR & EXPD/RECY 
024624 104456 T C#ERHRD 
.WORD 304 
024630 “WORD T3TSBA 
024632 015554 ; EXPREC 
352 024634 3 INC R3 sFORCE INIT ON NEXT PASS 
354 024636 35%: ENDSEG 3<<<¢¢¢¢¢¢000¢ END SEGMENT <<ceeeeeeeecc 
024636 10000$ : 
024636 104405 TRAP  C$ESEG 
356 024640 105204 INCB = RG ;NEXT DATA PATTERN TO TEST 
357 024642 00127 BNE , WHEN BACK TO ZERO 
024644 004737 016536 JSR PC, TSTLOOP sSHOULD WE DO ITERATIONS ? 
359 024650 10 BCC H sBRANCH IF NOT 
024652 000137 024416 JMP T3LOOP ;LOOP UNTIL COUNT 
361 024656 40$: EXIT TST sALL DONE THIS TEST 
024656 104432 TRAP C$EXIT 
000210 .WORD 110042-. 
3 3° 
sLOCAL TEXT MESSAGES FOR TEST 
see - 
367 024662 124 123 102 T3TSBA: .ASCIZ ‘TSBA Incorrect After TSDB Low Write’ 
368 024726 124 123 123 T3TSSR: .ASCIZ ‘TSSR Incorrect After TSDB Low Write’ — 
369 024772 116 157 040 T3SSR: .ASCIZ ‘No Sub-System Re After TSDB Low Write’ 
70 025043 127 162 141 TST3I0: -ASCIZ ‘Wrap Dete - Low Byte’ 
372 025070 ENDTST 
025070 L10042: 
- 025070 104401 TRAP C$ETST 
374 .SBTTL TEST 4: RAM TEST 
376 : THIS TEST VERIFIES THAT ALL LOCATIONS OF THE RAM ON THE M7196 
377 } Y ST BACK ATA PATTERNS, AND THAT 
378 ; EACH RAM LOCATION IS UNI Y (I.€., THAT ONE AND ONLY 
379 , ONE LOCATION IS ACCESSED BY ANY PARTICULAR ADDRESS). THESE 
380 : TESTS ARE PERF SUBTESTS, DESCRIBED BELOW. A 
381 ' BYPRODUCT OF THESE TESTS IS A VERIFICATION OF TWO REGISTERS IN 
382 : THE 2901 AND THE CAPABLITY OF THE 2901 TO CORRECTLY PERFORM AN 
ry ADD. 
384 3 


J9 
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SEQ 0113 
TEST 4; 2AM TEST 
385 3 
386 : 
387 ; TEST 4 , SUBTEST 1: - 
389 : THIS SUBTEST VERIFIES EACH RAM LOCATION BY FIRST PLACING THE 
390 : M7196 INTO MAINTENANCE MODE BY WRITING INTO THE LOW BYTE OF TSDB 
391 : AND THEN PERFORMING THE FOLLOWING SEQUENCE FOR EACH ADDRESS 
392 3 0-7777 COCTAL): 
a 3 
395 : 1. THE ADDRESS TO BE TESTED IS LOADED INTO THE TSDB (VIA A 
396 ; WORD WRITE). 
398 : 2. THE ADDRESSED RAM LOCATION IS WRITTEN, THEN READ INTO 
399 ; THE LOW BYTE OF TSBA, BY WRITING A DATA BYTE INTO THE 
400 ; LOW BYTE OF TSDB. 
402 ; 3. THE LOW BYTE OF TSBA IS CHECKED 10 SEE IF IT CONTAINS 
403 ; THE DATA PATTERN ORIGINALLY WRITTEN; A DISCREPANCY IS 
404 : REPORTED AS AN ERROR. 
406 ; 4. THE ADDRESS OF THE LOCATION BEING TESTED IS AGAIN 
407 ; WRITTEN INTO TSDB (WORD WRITE), TO CAUSE THE LOCATION 
408 : UNDER TEST TO AGAIN BE READ INTO THE LOW BYTE OF TSBA. 
409 ; THE LOW BYTE OF TSBA IS AGAIN CHECKED AND DISCREPANCIES 
410 ; REPORTED. 
412 ; S. THE HIGH BYTE OF TSBA IS CHECKED, IT SHOULD CONTAIN 
413 ; THE SUM OF THE HIGH AND LOW Byres LAST URTTNEN INTO 
414 ; TSDB AS A WORD. A DISCREPANCY IS REPORTED AS A 2901 
rir 3 PROBLEM. 
417 4 6. THE CONTENT OF TSSR IS CHECKED, SETTING OF THE SC BIT 
48 ; IS IGNORED. OTHER DISCREPANCIES IN TSSR ARE REPORTED. 
: 
421 025072 BGNTST 
025072 T4:: 
423 oemrs BGNSUB 4444464444444 er Benes S4hAGAAAGAASA 
025072 104402 "TRAP csesuB 
429 025074 012700 026402 Mov @TST4ID,RO }ASCII MESSAGE TO IDENTIFY TEST 
430 025100 004737 016570 JSR —s- PC, TSTSETUP {00 INITIAL TEST SETUP 
431 025104 012737 000005 oo2214 | MOV @5,,LOOPCNT PERFORM 5S ITERATIONS 
433 025112 004737 016054 * JSR «PC, SOFINIT 100 INITIALIZE ON CONTROLLER 
434 025116 103405 Bcs 46s 208 i0R IF INIT WAS OK 
010001 : MOV. —s- RO, RA SCONTENTS OF TSSR REGISTER 
439 025122 ERRDF ERRNO, SFIERR,SFIMSG FATAL ERROR TSSR WAS NOT OK 
025122 104455 TRAP «CSE RDF 
025124 000621 .WORD 401 
$2 "WORD SFIERR 
130 012104 WORD  SFIMSG 


440 025132 005004 20%: CLR R4 ;SET RAM ADDRESS AT ZERO’ 
441 025134 004737 016416 JSR PC,CHKTSSR sWAIT FOR READY, NON-AMBIGUOUS 





K9 
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qegdeg 


- 
© 


PRED: Baye 


sSET INTO MAINTENANCE MODE 


g>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C$BSEG 


sEXPECTED DATA FROM WRAP-AROUND 

;WAIT FOR READY, NON-AMBIGUOUS 
sLOAD ADDRESS INTO TSDB 

OAT FOR READY, NON-AMBIGUOUS 

:LOADS DATA INTO RAM LOCATION 

;WAIT FOR READY, NON-AMBIGUOUS 
;READS WRAP DATA 

;D0ES URITTENCURAP ) = READ 

:8R IF OK, THEY ARE EQUAL 

‘DATA NOT WRAPPED CORRECTLY 


C#ERHRD 
-WORD 402 
«WORD TSBAM2 


3<<<eeeeeceecee END SEGMENT <<eeeeeeeeecc 
10000$ : 
TRAP CSESEG 


sNEXT 
sEND OF RAM MEMORY CHECK 
;LOOP TILL ALL RAM WRITTEN 
s00N'T CONTINUE IF ERROR ON WRITE 
TRAP C$ESCAPE 
.WORD 110044-. 
sCLEAR OUT R2 HIGH BITS 
SET BACK TO 7 
iGET DATA PATTERN BACK IN SHAPE 
;WAIT FOR READY NON- AMBIGUOUS 
;LOAD UP RAM SS POINTER 
SWAIT FOR READY, NON- AMBIGUOUS 
sREAD RAM CONTENTS BACK 
;CHECK WITH DATA WRITTEN 
:BR IF OK DATA IN = PATA OUT 
;WRITTEN DATA READ 
TRAP 
> WORD 
> WORD 
sSCOPE LOOP 
TRAP 


sHIGH BYTE READ OF TSBA 
sDATA PATTERN WRITTEN 


sHIGH TO LOW 
sTOTAL OF BYTES IN LOW BYTE 
3SUM OF BYTES WRITTEN TO TSDB = 
;BR IF OK, THEY SHOULD BE 
32901 PROBLEM ADDER 
TRAP 
. WORD 
"WORD 


SEQ 0114 
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TEST 4: RAM TEST 


SE@ 0115 


-WORD EXPREC 
S0$: sSCOPE LOOP 
TRAP CsCLP1 


sDROP DATA ee ene 
sNOT AT LOC. ZERO YET 


sN\NAANANAANNN END SUBTEST \ANANNANAAAAN 
L10044: 
TRAP —- CSESUB 
BGNSUB 444444444444 one SAAAGAAAASAS 
“<f TRAP ss C4BSUB 
TEST 4, SUBTEST 2 
THIS SUBTEST WRITES RAM WITH ALL ZEROS 
THEN WALKS AN ALL ONES WORD DOWN THROUGH MEMORY 
PC, SOFINIT :D0 INITIALIZE ON CONTROLLER 
203 WAS OK 


sBR IF INT 
sCONTENTS OF TSSR REGISTER 


Ri T 
» SFIERR , SFIMSG sFATAL ERROR TSSR WAS a 


% 


BCS 


sTEST DATA = 0 
sSTARTING RAM 


8 

sSET INT 

3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C$BSEG 


sWAIT FOR READY, NON-AMBIGUOUS 
OAD ADDRESS INTO TSDOB 


MOV 
ERROF 
CLR 
CLR 
JSR 
CLRB 
BGNSEG 
JSR 
MOV 
JSR 
MOVE 
JSR 
MOV 
CMPB 
BEQ 
ERRHRD 


sBR_ IF OK, THEY 
sDATA NOT WRAPPED 

TSBAM2 

EXPREC 
g<<eeeecceeecee END SEGMENT <cceeeeeeeeee 

100008 : 
TRAP CsESEG 

NEXT ADDRESS 


‘END OF RAM MEMORY CHECK 
‘OR, MORE RAM TO GO 


aaa é 





M9 
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TEST 4: RAM TEST 


35%: 
40%: 


OEC 
CLR 
JSR 
MOV 
JSR 
MOV 
CLR 
CMPB 
BEQ 
ERRHRD 
MOV 
MOV 
JSR 
MOVB 
JSR 
MOV 
CMPB 
BEQ 
ERRHRD 
CKLOOP 
JSR 
MOV 
JSR 
MOVE 
MOV 
SWAB 
ADO 
CMPB 
BEQ 
ERRHRD 
CKLOOP 
DEC 
BGE 
ENDSUB 
BGNSUB 


sSET BACK TO 7777 
sSET ZEROS 
A (REGGAE EIR 


LOOKING FOR 

:80TH SHOULD BE 

:8R, IF DATA IS GOOD 

sCHARACTERISTICS DATA NOT CORRECT 
TRAP §CSERHRD 
-WORD 407 
WORD TSBAMS 
[WORD €XPREC 

POINTER 
sWAIT FOR READY, NON-AMBIGUOUS 
S BACK 


sREAD RAM CONTENT 
sCHECK WITH DATA WRITTEN 


BR IF OK, DATA IN = DATA OUT 
\WRITTEN DATA Not” = 70 READ 


sSCOPE LOOP 
sWAIT FOR READY 
sWORD WRITE TO 
sWAIT FOR READY, NON-AMBIGUOUS 
sHI_ 1 BYTE READ OF TSBA 
sDATA PATTERN WRITTEN 
GH TO LOW 


sTOTAL OF BYTES IN LOW BYTE 
SUM _ OF BYTES WRITTEN TO TSOB = 
THEY SHOULD BE 


| 
BR IF OK 
12901 PROBLEM ADDER 
TRAP 
“WORD 
sSCOPE LOOP : 3 


TRAP 
sbRop RAM ADDRESS ER 
sNOT AT LOC. ZERO al 
s\ANAAAANAAANNN END Ravess NAAAAANAAAAAANA 
L10045: 


TRAP CsESUB 


ALAA Sepp KetEst SAMSTAG ASSS 
238 
C#BSUB 


SEQ 0116 
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TEST 4: RAM TEST 


SEQ 0117 


TEST 4, SUBTEST 3 
THIS SUBTEST WRITES RAM WITH ALL ONES 
THEN WALKS A ZERO WORD DOWN THROUGH MEMORY 
JSR 300 INITIALIZE ON CONTROLLER 
BCS 20% :8R IF INIT WAS 


sCONTENTS OF TSSR REGISTER 
sFATAL ERROR TSSR WAS a 4 


sue 


:SET DATA AT ALL ONES 
ETT FOR READY. NON APS IGUOUS 
}SET INTO MAINTENANCE MODE 


S838 


ats 


3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C#BSEG 


: 


;WAIT FOR READY, NON- AMBIGUOUS 
L INTO T 


peceensne 
preageee pete 


g<<eceeeecccec<e END SEGMENT <eceeeeeeeeee 
100004: 

TRAP CsESEG 
sNEXT 
sEND OF MEMORY 
sBR, MORE RAM TO GO 
sNO CHECK IF WAETTEN Decgnegch. 


‘COESCAPE 
Teas CHESCAeE 


ae 


: Bs 
i rat 
z ne 
Fo eo fe 
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TEST 4: RAM TEST 
026014 


SE@ 0116 


sSET UP a EXPECT 


Qoeses 
3 


sREAD RAM CONTENTS BACK 

I CHECK WITH D DATA WRITTEN 

:BR IF OK A IN = DATA OUT 
i} WRITTEN bara. NOT = TO READ 


> 


a2D~- 
Vie 
e 

: 8 


sSCOPE LOOP 


TRAP 
sWAIT FOR READY, NON-AMBIGUOUS 
sHIGH BYTE READ OF TSBA 
;DATA PATTERN WRITTEN 
sHIGH TO LOW 
sTOTAL OF BYTES IN LOW BYTE 
+ on trey WRITTEN TO TSOB = 

ge BE 


8501 F PROBLEM 


CLR 
MOV 
JSR 
MOVB 
JSR 
MOV 
CMPB 
BEQ 
ERRHRD 
CKLOOP 
JSR 
MOVB 
MOV 
SWAB 
ADD 
CMPB 
BEQ 
ERRHRD 
CKLOOP 


sSCOPE LOOP 

TRAP CsCLPl 
sOROP RAM ADDRESS POINTER 
SNOT AT LOC. ZERO YET 


BNANANANAANANN END SUBTEST \ANAANANAAANA 
L10046: 
TRAP CsESUB 


JSR PC, TSTLOOP ITERATE TEST ? 
BCC 633 

P T4LOo0P 

EXIT TST 


Re 


é 
cS 


634: 
TRAP CsExIT 
-WORD L10043-. 
SLOCAL TEXT MESSAGES FOR TEST 
* TSBA Hig 
, Wr ite 


+38 T 3 
115 TST4ID: 
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TEST 4: RAM TEST 
026424 104401 TRAP CsETST 
-SBTTL TEST S: SECOND INITIALIZATION TEST 
THIS TEST VERIFIES THE SAME S$ AS o * ee te 2a 


Rio THAT. 2901 REGISTERS eget as meee 


yas 2 
ALLY 


BEING MEXECUT 
Che, THA ONE Fas INITIALI VIA A Bad 
INITIALIZING NG BY WRITING INTO THE TSSR), THE FOLLOWING 


SE@ 0119 


EACH RAM LOCATION AND 2901 REGISTERS 10 AND 11 ARE SET 
TO ALL 1'S BY USING WRITES INTO = REGISTER (LOW 
BYTE MAINTENANCE MODE WORD WRITES 


THE CONTROLLER IS eM ee a tg THE VARIOUS ros ON 
THE TSSR a = INITIALIZATION TEST @1 ARE 


#1'S (377 OCT WRITTEN OW BYTE OF 
1 ee AS of AL) Chose han arn TO" 10 LOW B TSOB, 


BE WRITTEN TO ALL 
Te SINCE D901 REGISTERS. 10 AND 11, SPECIFYING THE RAM 
ADDRESS, SHOULD BE 0. RAM LOCATION 0 IS_VERIFIED BY 
WRITING A WORD OF ZEROS INTO THE TSDB. THE RESULTING 
LOW BYTE OF TSBA SHOULD CONTAIN: ALL 1'S. 


THE ENTIRE RAM IS SCANNED. LOCATION O SHOULD CONTAIN 
net Li3 S AND THE REMAINING LOCATIONS, EXCEPT FOR THE 
BUFFER IMAGE a FN SHOUL 


AIN_O. 
Ors SCREPANCIE AN Boy AT THIS POINT IS 
og ate eee 


TS:: 
@TSTSID,RO ASCII ME 10 IDENTIFY TEST 
Be TeTSeTUP OO TITAS TEST 
20, .LOOPCNT }PERFORM 20 ITERATIONS 
FATFLG :CLEAR THE FATAL ERROR FLAG 


s4//141/111/4 BEGIN SUBTEST //////////17/ 


og erway 
ERRNO, SFIERR , SFIMSG 
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TEST S: SECOND INITIALIZATION TEST 
012104 WORD  SFIMSG 
013702177777 rALL ONE DATA PATTERN sa 
tEUTT FOR READY. NaN: AMBIGUOUS 
‘ ett Fon ENANCE = AMBIGUOUS 
T CRS) sSET NEXT RAM ADDRESS 
PC: ;WAIT FOR READY, NON-AMBIGUOUS 
SOBCRS) SLOAD TEST DATA 
: SS TO TEST 
\COMPARE TO LAST ADDRESS 


issue A’ 


TRAP 
+ FOR READY NON - AMBIGUOUS 
OF TSSR 


; HESE Bits MAY BE SET 
tet AND NEW DATA SHOULD BE SET 
sCOMPARE EXPECTED TO RECEIVED 


{REPORT A FATAL. ERROR 


ath Uyiaepice 


oo 
HH 
nor 


sSET FATAL ERROR FLAG — 
sLOOP ON ERROR IF FLAG SET 


sEXIT IF FATAL ERROR DETECTED 
TRAP 


. WORD 
PUT BACK INTO MAINTENANCE MODE 


{WAIT FOR READY NON- AMBIGUOUS 
sSET ADORE SS BACK TO 0000 


}WAIT FOR R READY . 
16 RAM 


TUASNe T POINTING TO CORRECT LOC. 
TRAP 


THE FATAL ERROR FLAG 
+ SE Ope Cour a 
1NO MORE CHECKS IF FATAL ERROR 
TRAP 


sSTART WITH LOC 310 
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TEST S: SECOND INITIALIZATION TEST 

783 026716 

Jes osey ETT FOR REO SHOULD BE 000000 


016416 , 
pt sod 4 NON- AMBIGUOUS 


016416 
000000 


RBS 
e 


20 


1 CHE’ 
; BRANCH IF DATA OKAY 
sMEMORY NOT ZERO AFTER a 


sSET THE FATAL ERROR FLAG 
TRAP 
sEXIT ON FATAL ERROR 
TRAP 


OOK AT NEXT RAM LOC. — 
;AT TOP OF RAM ADDRESS SPACE 
;BRANCH TILL ALL MEMORY TESTED 
s\\NANANAAANNN END SUBTEST \ANAAANAAAANN 
L10050: 
TRAP © CSESUB 
1S FATAL ERFOR FLAG SET ? 
1BR or 


3NO LOOPS TaY_TO DROP DEVICE 
:CLEAR THE FATAL ERROR FLAG 


~ 
w 
«4 


8444444 44444 a Sosa SAGAAGAAASASA 
. $ 
TRAP C$6SUB 
300 A SOFT TO START 
s6P. F O.K, 
s<€PORT ERROR AND DROP onIve 


BEQ 
JSR 
CLR 
BGNSUB 
JSR 
BCS 
ERROF 


gegror 
$F INsG 
tSTARTING R oars PATTERN 


s*e8f © 
asas 
ws ws 


FS STa¥ fa) 


Sou 
aie 
BAG 
28 


SeOPaeaeaeeaes 
: 


T FOR READY NON- AMBIGUOUS 
THE CONTENTS 


~ 
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TEST S: SECOND INITIALIZATION TEST SEQ 0122 


R1,R2 sCONTENTS OF TSSR 
OTC<HIADOR!OFL> ,R2 THESE BITS MAY BE SET 

@SSR!NBA,R2 sREADY AND NEW DATA SHOULD BE SET 
RL R2 1 COMPARE EXPECTED TO RECEIVED 


sBRANCH COMP 
ERRNO, SFHERR , SFFMSG ;REPORT A FATAL ERROR —_ 


3 


sSET FATAL ERROR FLAG 
ALP On 


sEXIT IF FATAL ERROR DETECTED 


THORD 
sWAIT FOR SSR TO SET 
3PUT BACK INTO MAINTENANCE MODE 
;WAIT FOR READY, NON-AMBIGUOUS 
sSET ADDRESS BACK TO 0000 
WAIT FOR READY 


1 


TO RAM O 


pg ear SHOULD BE 377 OCTAL 
;WASN’ T POINTING TO CORRECT LOC. 
TRAP $ 


JSR 
CLRB 
JSR 
CLR 
MOV 
JSR 
MOVB 
JSR 
CLR 
JSR 
MOVE 
CMPB 
BEQ 
ERROF 


- WORD 
WORD 
sSET THE FATAL ERROR FLAG 
sSCOPE LOOP 


2% 


CsCLP1 
CSESCAPE 
L10051-. 


TRAP 
sNO MORE CHECKS IF FATAL_ERROR 
TRAP 


sSTART WITH |.OC 310 
EXPECTED 


gaygedecs 


sSET THE FATAL ERROR FLAG 


TRAP 
sEXIT ON FATAL ERROR 
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SEQ 0123 
TEST S: SECOND INITIALIZATION TEST 


027332 104410 TRAP, CHESCAPE 
869 027836 Ooscos INC RA LOOK AT NEXT RAM LOC. * vat 
3 e 
870 027340 020427 000400 CHP R4, 0400 AT TOP OF RAM ADDRESS SPACE 
671 027344 001353 BNE 303 }BRANCH TILL ALL MEMORY TESTED 
gg 027346 ENDSUB sNN\NANNAAAAAANNN END SUBTEST NANANANAANANN 
027346 L10051: 
ara 02736 108408 TRAP —- CSESUB 
875 027350 005737 002220 TST FATFLG IS FATAL ERROR FLAG SET ? 
876 027354 001402 BEQ = S08 }BRANCH IF NOT 
877 027356 004737 017262 JSR PC, CKDROP NO LOOP. TRY TO DROP DEVICE 
878 027362 004737 016536 S0$: JSR PC’ TSTLOOP {SHOULD WE DO ITERATIONS ? 
879 027366 103002 Bcc 60% BRANCH IF NOT 
880 027370 000137 026444 re TSLOOP }LOOP UNTIL COUNT EXPIRED 
881 027374 60$: EXIT TST ALL DONE THIS TEST 
027374 104432 TRAP C$EXIT 
027376 000132 .WORD 10047-. 
Ses 
t° 
gga }LOCAL TEXT MESSAGES FOR TEST 
ge 
886 
887 027400 105 170 164 ISTSID: .ASCIZ ‘Extended Initialization’ 
888 027430 111 156 143 TSMEM: ‘ASCIZ ‘Incorrect RAM Data After Init’ 
p44 027466 111 156 143 TSADDR: .ASCIZ ‘Incorrect RAM Address After Init’ 
891 027530 énwrst 
30 L10047: 
104401 TRAP —-C4ETST 
S93 
654 .SBTTL TEST 6: COMMAND REJECT 
896 
897 : THIS TEST VERIFIES THAT ALL COMMANDS OTHER THAN WRITE 
898 : CHARACTERISTICS ARE REJECTED DUE TO THE NEED BUEFER ADDRESS 
899 ; (NBA) BIT BEING SET IN TSSR, AND THAT THE TSBA AND TSSR 
900 : REGISTERS ARE LEFT IN THE PROPCR STATE AFTER EACH COMPIAND IS 
901 ; JECTED, THIS TEST CHECKS HICROPROCESSOR SEQUENCING. BASIC 
902 ; COMMAND BECODING AND DATI DMA HANDLING. THIS TEST CONTAINS TWO 
903 ; SUBTESTS: SUBTEST 3 SEQUENCES THROUGH ALL COMMAND WORDS COTHER 
904 ; ACTERISTICS) MITH THE INTERRUPT ENABLE CIE) BIT 
905 : CLEAR AND VERIFIES THAT AN INTERRUPT IS NOT GENERATED BY 
906 ; REJECTED COMMAND, SUBTEST 2 PERFORMS SIMILARLY TO SUBTEST 1 BUT 
907 ; SETS THE I6 BIT EN EACH COMMAND WORD AND VERIFIES Tray ain 
908 ‘ INTERRUPT 1S GENERATED WHEN THE IS REJECTED. SUBTEST 1 
$09 ; SETS UP INTERRUPT. SERVICE ROUTING TO-FLAG UNEXPECTED 
910 : INTERRUPTS. THE COMMAND WORD IN THE COMMAND BUFFER IS 
$11 ; INITIALIZED TO. 100000 COCTAL) AND THE REMAINING THREE WORDS IN 
912 ; THE COMMAND ARE SET TO KNOWN UNIQUE PATTERNS. THEN THE 
33 ‘ : FOLLOWING SEQUENCE IS PERFORMED: 
a 
915 r 
916 3 
3 


1. INITIALIZE THE CONTROLL 
PROPER OND 


BY WRITING INTO THE TSSR; 
INITIAL C VERIFIED. 
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SEQ 0124 
TEST 6: COMMAND REJECT 
318 : 
91 3 2. TSOB IS WRITTEN WITH ADDRESS OF THE COMMAND BUFFER TO 
ose 3 START PROCESSING. 
3 
922 , 3. THE PROGRAM WAITS FOR SSR TO SET; IF SSR DOES NOT SET, 
923 ’ AN ERROR REPORT IS ISSUED AND THE TEST IS ABORTED. 
924 3 
925 : 4. THE CONTENTS OF TSSR ARE CHECKED. TSSR IS CORRECT IF 
926 ’ IT CONTAINS EITHER OCTAL 102206 OR 102306 (BIT 6 
927 3 DEPENDS UPON THE STATE OF THE TAPE TRANSPORT). 
928 : 
929 ’ S. THE CONTENTS OF TSBA ARE CHECKED. TSBA SHOULD CONTAIN 
930 ; THE INITIAL C BUFFER ADDRESS (LOADED IN STEP 2) 
931 ; PLUS 10 COCTAL); I.E., TSBA SHOULD POINT TO 
338 3 JUST AFTER THE ComMaND eee THAT 4 COMMAND 
oes ; ACKET WORDS ARE ALWAYS FET 
3 
935 3 6. USING THE MAINTENANCE MODE WRAPAROUND FUNCTIONS, THE 
936 3 COMMAND IMAGE BLOCK IN THE Stale S RAM (LOCATIONS 
937 3 201-210 oe fet 22 ARE CHECKED IMAGE SHOULD CONTAIN 
938 ; A COPY OF THE POUR COMFAND PACKET WORDS AS StT UP IN 
; ‘ 
$40 3 
941 3 7. THE COMMAND WORD IN THE COMMAND BUFFER IS INCREMENTED 
942 3 TO THE NEXT PATTERN NOT CONTAINING WRITE 
943 ; CHARACTERISTICS OR IE. THE REMAINING THREE WORD OF THE 
944 ’ OMMAND BUFFER ARE ot WITH PSEUDO-RANDOM DATA. 
945 3 IF THE COMMAND REACHED ITS MAXIMUM VALUE 
oss 3 (1777771), THE TEST SEQUENCE IS REPEATED. 
3 
ee 3 
: 
950 3 SUBTEST 2 IS IDENTICAL TO SUBTEST 1, EXCEPT THAT THE PROGRAM 
951 ’ CAUSES THE IE BIT TO BE SET IN EACH COMMAND WORD AND THEN 
952 5 VERIFIES THAT AN INTERRUPT OCCURS. 
953 3 
954 027532 BGNTST 
027532 T6:: 
959 027532 012700 030763 MOV #TST6ID,RO sASCII MESSAGE TO IDENTIFY TEST 
960 027536 004737 016570 JSR PC, TSTSETUP s00 INITIAL TEST SETUP 
961 027542 012737 000024 002214 MOV #20. ,LOOPCNT sPERFORM 20 ITERATIONS 
962 027550 T6LOOP ; 
963 027550 BGNSUB s/////1/4//// BEGIN SUBTEST //////////747 
027550 T6.1: 
027550 104402 TRAP CsBSUB 
965 027552 SETPRI #PRIOO sLOWER PRIORITY TO ALLOW INTERRUPTS 
027552 012700 000000 MOV @PRIOO,RO 
027556 104441 TRAP C$SPRI 
027560 012704 030440 MOV @T6PACKET ,R4 sGET THE ADDRESS OF COMMAND PACKET 
012703 002752 MOV OTSTBLK,RS ;BLOCK OF TEST DATA 
968 027570 012314 5$: MOV (R3)+,(R4) sINSERT THE NEXT TEST DATA WORD 
969 027572 BGNSEG 3>>>>>>>>>>>> BEGIN eet 1! >>>>>>>>>>>> 
027572 1 TRAP C$BSEG 
970 027574 004737 016054 JSR PC, SOFINIT 3:00 SOFT INIT OF CONTROLLER 
971 027600 10 BCS 104 sBR IF SOFT INIT = OK 


3405 
975 027602 010001 MOV RO,R1 sSAVE CONTENTS OF TSSR 
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TEST 6: COMMAND REJECT 


976 027604 
604 


002220 
002222 
016416 
000200 


000000 
016330 


002220 


002222 


102206 
016416 
000002 
000100 
000100 


016416 
000000 


000010 


10$: 


15$: 


22%: 


25%: 


30%: 


ERRNO, SFIERR , SFIMSG 


FATFLG 
INTRECY | 
gt, Tha) 2, 


TSOBCRS) 
ao "al 

ERRNO, T6SSR,PKTSSR 
FATFLG 

suB 


ee 
ERRNO, T6INT ,PKTSSR 


35 
ERRNO, T6TSBA, EXPREC 


sDEVICE FATAL ERROR DURING INIT 
TRAP 


Cen FATAL ERROR F' 


LAG 
AR_INTERRUPT RECETVED FLAG 
SWAIT FOR_READY, NON-AMBIGUOUS 


sOISABLE INTERRUPT Ss 


sSET_ THE P we T ADORESS 


sWAIT FOR SSR 


TO SET 
sBR IF CARRY SET (GOOD RETURN) 


sSAVE CONTENT 


S OF TSSR 
;DEVICE FATAL SSR rane 4 SET 


sSET FATAL ERROR FLAG 


sLOOP ON ERROR, IF FLAG =. 
sBY-PASS SUBTEST IF FATAL "ERROR 


sDID AN owe OCCUR ? 


sBRANCH IF 


sEXPECTED CONTENTS OF TSSR 
NON- AMBIGUOUS 
S OF TSSR 


sWAIT FOR READY 
sGET THE CONT 
sIS OFF-LINE Be OY 


sBRANCH IF _NO INE 
iSET OFF - Le IN EXPECTED lg 
S EXPECTED MATCH RECEIVED ? 


MATCH 
sNBA NOT SET TO REJECT 


1D0E 
OKAY IF 


sLOOP ON ERROR ? 


;WAIT FOR READY, NON-AMBIGUOUS 
GET TSBA REGISTER CONTENTS 
THE P. SacKet 


sSTAR 


+B LPECT TSDA TO PACKET «+ 
s COMPARE i phy TO RECEIVED 


iERROR IF 


sPRINT THE ERROR € Ero 


SEQ 0125 


CsEROF 
602 
T6SSR 
PKTSSR 
C$CLP1 


C#ESCAPE 
L10053-. 


CS#ERHRD 
603 
T6INT 
PKTSSR 


CS#ERHRD 
604 


T6NBA 
PKTSSR 


CsCLP1 


C#ERHRD 
605 
T6TSBA 
EXPREC 
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1064 64 
1065 030170 
1066 030172 


TEST 6: COMMAND REJECT 


011154 


177740 
000004 


35$: 


45$: 


50$: 


5$: 


10%: 


SETPRI 


esse 
ERRNO , PKTRAM, RAMERR 


@PRIOO 


@T6PACKET ,R 
STSTBLK Re 
(R3)+,(R4) 


PC, SOFINIT 
ERANG, SFIERR , SFIMSG 


FATFLG 


SEQ 0126 
3SEE IF DATA IN RAM IS CORRECT 
s;BRANCH IF PACKET IN RAM IS CORRECT 
sREPORT THE RAM ERROR(S 
TRAP C#ERHRD 
«WORD 606 
-WORD PKTRAM 
-WORD RAMERR 
3<<<¢¢¢¢¢¢e¢¢¢ END SEGMENT Pee c cece seas) 
10000$ : 
TRAP CsESEG 
sPACKET C 
sGET eT S 0-4 
sD0N'T TEST WRITE CHARACTERISTICS 
sBRANCH IF 
sGET NEXT WORD FROM DATA TABLE 
sREACHED END OF gg ? 
sBRANCH IF_END OF TABLE 
sCONTINUE TEST WITH NEW DATA 
sN\AVAAAAAAAANN END SUBTEST NANNANAAAAAAN 
L10053: 
TRAP CsESUB 
sANY FATAL ERRORS ? 
sBRANCH IF NOT 
sTRY TO DROP THE UNIT 
B4AAAASASSASS | teal SAAAASAAAASS 
. : 
TRAP Cs#BSUB 
sLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV @PRIOO,RO 


TRAP C$SPRI 
sGET THE ADDRESS OF COMMAND PACKET 
iSTART OF TEST DATA 
sPLACE NEXT DATA WORD IN PACKET 
$>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP CsBSEG 


3:00 SOFT INIT OF CONTROLLER 

sBR IF SOFT INIT = OK 

iSAVE CONTENTS OF TSSR 

sDEVICE FATAL ERROR One part 
TWoro 607 
—_ 


iCLEAR FATAL ERROR FLAG - 
;CLEAR INTERRUPT RECEIVED FLAG 
WAIT FOR READY, NON-AMBIGUOUS 
sENABLE INTERRUPTS 

ACKET ADDRESS 
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TEST 6: COMMAND REJECT 
1070 030174 
30174 

030176 

30200 

1071 030204 
1072 030210 
30210 

1073 030212 
30212 


30214 
1074 030216 


1096 
1102 030322 
030 


002220 


002222 


102206 
016416 
000002 
000100 
000100 


016416 
000000 


000010 


011154 


15$: 


22%: 


25%: 


30%: 


35$: 


40%: 


ERROF 


ERRNO, T6SSR ,PKTSSR 


FATFLG 


ERRNO, T6NBA,PKTSSR 


PC, CHKTSSR 
TSBACRS),R1 

R4,R2 

#10,R2 

Ri R2 

353 

ERRNO, T6ETSBA, EXPREC 


cae 
ERRNO , PKTRAM, RAMERR 


CR3),RO 





;DEVICE FATAL SSR FAILED TO SET 
TRAP CSEROF 
WORD 608 
“WORD -T6SSR 
“WORD PKTSSR 
SET FATAL ERROR FLAG 
LOOP ON ERROR, IF FLAG SET. 
CSCLP1 
\BY-PASS SUBTEST IF FATAL ERROR 
TRAP CS$ESCAPE 
° L10054-. 
,DID AN INTERRUPT OCCUR ? 
TOEPORT ERROR IF NO INTERRUPT 
o 
TRAP CSERHRD 
WORD 609 
“WORD ‘T6NINT 
“WORD PKTSSR 


sEXPECTED CONTENTS OF TSSR 
a. FOR READY, NON-FiMBIGUOUS 
sGET THE CONT OF TSSR 

ids OFF - “Pe BIT SET ? 


OFF -LINE 
iSET OFF-LINE IN N, EXPECTED DATA 
sDOES EXPECTED MATCH RECEIVED ? 
SOKAY IF MATCH 
sNBA NOT SET TO REJECT 


TRAP CSERHRD 
. WORD 10 
. WORD T6NBA 
.- WORD PKTSSR 
sLOOP ON ERROR ? 
TRAP CSCLP1 
sWAIT FOR READY - AMBIGUOUS 
sGET TSBA REGIStER € sepa 
START OF bl 4 
sEXPECT TSDA TO PACKET «+ 
sCOMPARE EXPECTED TO RECEIVED 
sERROR IF NOT EQUAL 
sPRINT THE ERROR & EXPD/RECV 
TRAP C#ERHRD 
. WORD 611 
WORD T6TSBA 
. WORD Cc 
3SEE IF DATA IN RAM IS C cT 
sBRANCH IF PACKET IN RAM IS CORRECT 
sREPORT T RAM ERROR(S) 
TRAP CSERHRD 
. WORD 612 
. WORD PKTRAM 
P RAMERR 
3<<eeeeeecceccece END SEGMENT <<eeeeeeeeeec 
100008: 
TRAP CsESEG 


sNEXT PACKET COMMAND WORD 


SEQ 0127 
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TEST 6: COMMAND REJECT 


177740 0177740,RO sGET BITS 0-4 
000004 RO, 04 sDON" T TEST WRITE CHARACTERISTICS 
asi BRANCH IF NOT WRITE CHARACTERISTICS 


62,R3 
R3.@TBLEND 
503 + BRANCH 
S$ TEST WITH NEXT DATA 
sN\N\NAANANANANN END SUBTEST \ANAANANANANN 
L10054 


* TRAP ss CHESUB 
FATFLG 
60$ 


UNTIL COUNT EXPIRED 
ALL DONE THIS TEST 
TRAP CsExIT 
-WORD 110052 


}LOCAL STORAGE FOR THIS TEST 
37 


10-<.-TSV2E7> 
PACKET FOR 


-BLKB 
T6PACKET ; s COMMAND TEST 
-WORD O sWILL CONTAIN VARIABLE COMMANDS 
052525 
125252 
052525 


;LOCAL TEXT MESSAGES FOR TEST 
at 


T6NBA pees Se 
T6SSR: asciI tents of ta meg Srerrest After Write Packet’ 


T6INT: 

T6NINT: 
T6TSBA: 
TST6ID: 


L10052: 
TRAP CsETST 


TEST 7: WRITE CHARACTERISTICS 
THIS TEST VERIFIES BASIC OPERATION OF THE WRITE CHARACTERISTICS 


IT VERIFIES THAT THE BLOCK AND ACTERISTICS 
ery BLOCK ARE Fer PROPERLY FROM REMORY NEED BUFF! 
ADORE (NBA) BIT IN TSSR IS HANDLED Y, AND THAT A PROPER 
KE ACKET IS STORED, WHERE APPROPRIATE. ‘THIS TEST DOES NOT 


CHECK T THE VARIOUS FUNCTIONS ENABLED BY CHARACTERISTIC MODE 
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TEST 7: WRITE CHARACTERISTICS 


DATA BITS OPERATE PROPERLY 4 THE FUNCTIONING OF THESE BITS IS 
VERIFIED IN SUBSEQUENT TESTS. ALL CUTED IN THIS 
TEST pf THE INTERRUPT ENABLE CIE) BIT ae TO ZERO 


D BE ATED. HE 
econ PRIORITY O, WITH THE INTERRUPT SERVI 
TO FLAG UNEXPECTED INTERRUPTS. IF AN INTERRUPT OCCURS 
PROBLEM EXISTS IN EITHER THE LSI-11 BUS INTERFACE SECTION OR IN 
THE ROM OR PIPELINE. 


THIS TEST CHECKS VARIOUS MICROPROGRAM seaees . COMMAND 
DECODING LOGIC, AND BASIC PACKET PROTOCOL HANDLING. THIS 
IS THE FIRST TEST IN WHICH DATO DMA CYCLES eon STORING THE 
eet tt 5 thahae OTe Trent t ANY ERRORS IN THE BODY OF THE 
Mey ERRORS OTHER THAN INITIALIZATION ERRORS RELATED TO 
TRANSBORT BUS) DEFINITELY INDICATE A BAD M7196 MODULE. 


17 
@TST7ID,RO ;ASCII MESSAGE TO IDENTIFY TEST 
PC, TSTSETUP {00 INITIAL TEST SETUP 

#20. ,LOOPCNT - sPERFORM 20 ITERATIONS 


s4///11111/1/ BEGIN SUBTEST ///////////7/ 


300 SOFT INIT OF 
iBR IF SOFT INIT = OK 
sSAVE CONTENTS OF TSSR 
;DEVICE FATAL ERROR ORIG pat 
. WORD 
. WORD 
- WORD 
sWRITE CHARACTERISTICS PACKET 
to WRITE CHARACTERISTICS 
SSUED OK 


COMMAND I 

faite. CHARACTERISTISC FAILED 
"WORD 

* WORD 

WORD 


sSET PACKET TO START-UP VALUES 


ePRIOO sLOWER PRIORITY TO ALLOW INTERRUPTS 
@PRIOO,RO 
TRAP  C&SPRI 
eTSTBLK. 0. .R3 sSTART OF TEST DATA 
Ra : ADORESS OF PACKET 
$3. PRBENT CRA) sSTART WITH MINIMUM ALLOWABLE VALUE 


§>2>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C#BSEG 
PC, SOFINIT 300 SOFT INIT OF CONTROLLER 
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TEST 7: WRITE CHARACTERISTICS 
1219 031124 
031126 


a oe 


ie 


TST 
BEQ 
ERRHRD 
nov 
MOV 
: 
ERRHRD 
CKLOOP 
ov 
: 


15 
RO,R1 
ERRNO, T7SSR,PKTSSR 


3 
oXST2CR2) 


1, 
gist 


s8R IF SOFT INIT = OK 
sSAVE CONTENTS OF TSSR 
sDEVICE FATAL ERROR DURI 


sCLEAR FATAL ERROR FLAG 
CLEAR INTERRUPT RECEIVED FLAG 
P ADORESS 


sSAVE CONTENTS OF TSSR 
sDEVICE FATAL SSR FAILED TO. SET 


sSET FATAL ERROR FLAG 
sLOOP ON ERROR, IF FLAG 


RAP 
sBY-PASS SUBTEST IF —_ oo 
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TEST 7: WRITE CHARACTERISTICS 
001404 


004737 011154 


12864 031372 012364 000006 
1285 031376 020327 003062 


1286 031402 3002 
1267 031404 000137 031116 
1289 031410 


1291 031412 005737 002220 
1292 031416 001402 

1293 031420 004737 017262 
1294 031424 


1309 031440 0l2 

1310 031444 004737 

1311 

1312 031450 
031450 


35%: 


408: 


SS$: 


60%: 


| id 


BEQ 35% 
ERRHRD ERRNO, T7TSBA,EXPREC 


JSR PC, CKRAM 
BcsS 403 
ERRHRD ERRNO, PKTRAM,RAMERR 


MOV (R3)+,,PKBCNT(R4) 
@TBLEND 
BHIS 55% 


TST FATFLG 
BEQ 60% 


iTEST 7, SUBTEST 2 


CHECK THA 


T UNUSED BITS BEING SET 


CAUSES 
sWRITE CHARACTERISTICS COMMAND TO BE REJECTED 


S$: 


SETPRI #PRIOO 


MOV OTT2DATA,R 
MOV eT Teacet Re 
JSR PC, T7REST 
BGNSE 


SE@ 0131 
8 NOT EQUAL 
sPRINT THE & EXPD/RECV 
TRAP CSERHRD 
-WORD 707 
.WORD T7TSBA 
WORD 
sSEE IF DATA IN RAM IS CORRECT 
sBRANCH IF PACKET IN RAM IS CORRECT 
sREPORT THE RAM ERROR(S) 
TRAP CPERHAD 
. WORD 08 
-WORD PKTRAM 
:WORD RAMERR 
Peaceecececees: “ — Peaaccccee sacs: 
* TRAP —«CSESEG 
3SET THE TEST WORD 
sHAS ALL DATA BEEN TESTED ? 
sBRANCH IF ALL DATA DONE 
sBRANCH TILL BACK TO ZERO 
sN\NNANANANANN END SUBTEST NANNAAANAAANN 
L10056: 
TRAP CsESUB 
sANY FATAL ERRORS ? 
sBRANCH IF NOT 
sTRY TO DROP THE UNIT 
34////1/////// BEGIN SUBTEST //////////747 
“©F TRAP ss CSBSUB 
sLOWER PRIORITY TO ALLOW INTERRUPTS 
ed 00,RO 


@PRI 

TRAP C&SPRI 
ph OF TEST pars FOR SUBTEST 
sGET THE ADDRESS sere PACKET 
iRESTORE PACKET TO STARTING VALUES 


$>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C#BSEG 
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TEST 7: WRITE CHARACTERISTICS 


1314 931 016054 JSR PC, SOFINIT :00 SOFT INIT OF CONTROLLER 
3405 103 :6R IF ae 2 


ERAND,SFIERR,SFINSG  SBEVICE FA A Sl ang INIT 
ger 


- WORD 
sCLEAR INTERRUPT RECEIVED FLAG 
sSTART OF THE COMMAND 


OFF 
; Sey Data aris TO oF 
ACKET ADDRESS 


;LOOP ON ERROR, IF FLAG Ser 
s8Y-PASS CHECKS IF FATAL TERROR 


INTRECV sD0ID AN INTERRUPT OCCUR 
sBRANCH IF NOT 
» T7INT ,PKTSSR 


TSSRCRS),R1 
g8C1ScR! TSREJ!NBA,R2 
OOFL RI 


Is ? 
30 s00N’T PRINT IF NBA ONLY BAD BIT 
ERRNO, T72REJ,PKTSSR sCOMMAND NOT REJECTED 


CKLOOP sLOOP ON ERROR ? 


BIT ONBA ,R1 sIS NBA BIT SET ? 
BNE 35% sOKAY IF NBA SET 
ERRHRD ERRNO, T72NBA,PKTSSR sNBA NOT SET 
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031652 
1363 031654 
1364 031654 


1381 
1362 031676 
031676 
3 031676 
1364 031700 
953709 
031704 
1383S 031706 
1386 031712 
1367 031716 
1389 031722 
031722 


1 
1391 031724 
1392 031730 


012116 


000004 
033312 
031440 
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rsEST 7, SUBTEST 3 
i CHECK THE WRITE CHARACTERISTICS COMMAND IS REJECTED 


3IF 


@PRIOO 


stacker, R4 


PC 
103 


RO,R1 
ERRNO, SFIERR, SFIMSG 


SOF INIT 


R3,PKBCNT(R4) 

ar Mo Sa 

tT al 

ERAND, T7SSR,PKTSSR 


SEQ 0133 


-WORD PKTSSR 
9<<eeeeceececce END SEGMENT <<ceeeeeeeeec 
10000$: 


TRAP CSESEG 


sPOINT re. yy DATA wet 
IORANCH TF 


s\ANNANAANAAANN END SUBTEST \ANNAAANAAANA 
L10057: 
TRAP CsESuB 


ISSUED WITH AN INVALID DATA BLOCK BYTE COUNT 


SUBTEST ////////4/4/444 
sig csesus 
sLOMER PRIORITY TO ALLOW INTERRUPTS 


@PRIOO RO 
TRAP C#SPRI 


ALAA 


sSTARTING BYTE COUNT 

3 OF COMMAND PACKET 

sRESTORE PACKET TO STARTING VALUES 

3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C&BSEG 


3SA ENTS 
3 ICE FATAL 


sCLEAR INT 
sINSERT THE BYTE 
SET_ THE PACKET 


36R IF 
iSAVE CONTEN 
sDEVICE FATAL 
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15%: sLOOP ON ERROR, IF FLAG SET 
TRAP 


CsCLP1 
sBY-PASS SUBTEST IF FATAL_ERROR 
TRAP CSESCAPE 


-WORD 10000$%-. 
sDID AN INTERRUPT OCCUR ? 
sBRANCH IF NOT 


30 
ERRNO, T7SREJ,PKTSSR 


sLOOP ON ERROR 7? 


ONBA ,R1 sIS NBA BIT SET ? 
35% sOKAY IF NBA SET 
ERRNO, T72NBA ,PKTSSR sNBA NOT SET 


p<eeecececccce END SEGMENT <ccceeeceeece 
10000$ : 
TRAP CsESEG 


sNEXT BYTE COUNT 
sTESTED ALL INVALID ? 
sBRANCH Py TEST DONE 
sBRANCH TILL BACK TO ZERO 
sNANNAANNANANN END SUBTEST \AAAAANAAAAAN 
L10060: 
TRAP CsESUB 
hd 
iTEST 7, SUBTEST 4 


iSUBTEST TO VERIFY THAT A WRITE ACTERISTICS COMMAND IS 
sREJECTED IF AN ILLEGAL DATA BL ADORESS IS ISSUED. 
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TEST 7: WRITE CHARACTERISTICS 


ALLL GEGIN SUBTEST SAAAAAASASSS 
. : 
TRAP C$B8SUB 


SETPRI #PRIOO " sLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV by Ss ea 


TRAP 
AHL lh R3 eet OF TEST DATA FOR SUBTEST 


7PACKET ,R4 ADDRESS 
Be. T7REST RESTORE PACKET TO STARTING VALUES 


PC, SOFINIT 300 SOFT INIT OF CONTROLLER 
10% 18R IF SOFT INIT = OK 
RO,R1 sSAVE CONTENTS OF TSSR 
ERRNO, SFIERR , SFIMSG DEVICE FATAL ERROR DURING INIT 


~ 


INTRECV 
#1,T7DATA 
R4. TSDBCRS) 
PC; WAITF 
153 


RO,R1 
ERRNO, T7SSR,PKTSSR 


sLOOP ON ERROR, IF FLAG : 


RAP 
sBY-PASS SUBTEST IF FATAL_ERROR 
TRAP CSESCAPE 


. L10061-. 
sDID AN INTERRUPT OCCUR ? 
sBRANCH IF NOT 


SERPSERvEIE 
go> F, 2hs 


1500 032334 :DON' 
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SEQ 0136 
TEST 7: WRITE CHARACTERISTICS 
1504 032336 ERRHRD ERRNO, T74REJ,PKTSSR ;COMMAND NOT REJECTED 
ettrd 104456 TRAP CSERHRD 
032340 001322 7” 722 
032342 033635 -WORD T74REJ 
032344 012116 * 
1505 032346 30%: CKLOOP sLOOP ON ERROR ? 
032346 104406 TRAP CSCLP1 
1506 032350 032701 002000 BIT ONBA ,R1 31S NBA BIT SET ? 
1507 032354 001004 BNE 35% sOKAY IF NBA SET 
1511 032356 ERRHRD ERRNO, T72NBA,PKTSSR sNBA NOT SET 
032356 104456 TRAP CSERHRD 
0 1132 ~WORD 723 
032362 033312 ~WORD T72NBA 
15 032364 012116 ~WORD TSSR 
1513 032366 35%: ENDSUB sN\\NNAANANAANNN END SUBTEST N\ANANANAANANN 
032366 10061: 
032366 104403 TRAP CsESuB 
1514 
1515 
151 s¢ 
151 3 
; 4 sTEST 7, SUBTEST 5 
3 
1520 sCHECK THAT WRITE CHARACTERISTICS COMMAND IS REJECTED IF THE 
1323 sMESSAGE BUFFER LENGTH SPECIFIES AN INVALID COUNT (LESS THAN 14) 
7 
1323 + 
1525 oeere BGNSUB s/4/4411114/4 BEGIN SUBTEST S////////007/ 
. $ 
wees 032370 104402 TRAP C$BSUB 
1527 032372 SETPRI #PRIOO sLOWER PRIORITY TO ALLOW INTERRUPTS 
032372 012700 000000 MOV @PRIOO,RO 
032376 10444 TRAP C$SPRI 
032400 012703 000001 MOV #1,R3 sSTARTING BUFFER LENGTH 
032404 0127 033230 S$: MOV OT 7PACKET ,R4 3sGET THE ADORE OF COMMAND PACKET 
1530 032410 004737 034412 JSR PC, T7REST sRESTORE PACKET TO STARTING VALUES 
1532 032414 BGNSEG 3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
ns 0 4 104404 TRAP C#BSEG 
1534 032416 004737 016054 JSR PC,SOFINIT 300 SOFT INIT OF CONTROLLER 
535 032422 103405 BCS 10% :BR IF SOFT INIT = OK 
1539 032424 010001 MOV RO,R1 sSAVE CONTENTS OF TSSR 
032426 ERRDF ERRNO, SFIERR,SFIMSG sDEVICE FATAL ERROR DURING INIT 
032426 104455 TRAP CsERDF 
032430 oot ses .WORD 7 
032432 0036 -WORD SFIERR 
032434 012104 . WORD SFIMSG 
1541 032436 005037 002222 108: CLR INTRECV sCLEAR INTERRUPT RECEIVED FLAG 
1 032442 010337 033244 MOV R3,T7DATAs4 sINSERT THE BAD MESSAGE LENGTH 
1543 032446 010465 000000 MOV Bee LSvet RS) sSET THE PACKET ADDRESS 
032452 004737 016330 JSR PC WAIT sWAIT FOR SSR TO SET 
1545 032456 103405 6cSs 5 3BR IF CARRY SET (GOOD RETURN) 
032460 010001 MOV R1 sSAVE CONTENTS OF TSSR 
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TEST 7: WRITE CHARACTERISTICS 
1550 032462 


1553 032500 005737 002222 
1554 


000002 
560 032522 012702 102206 


tecg 001402 
1563 032534 052702 000100 
1564 020201 


005203 
020327 000016 
586 032624 002002 
tase 032626 000137 032404 


15%: 


22%: 


25%: 


30$: 


35%: 


S7$: 


| ad 


ERRDF ERRNO, T7SSR,PKTSSR 


MOV TSSRC(RS),R1I 

MOV @SC!SSR!TSREU!NBA,R2 
BIT OOFL ,R1 

BEQ 25% 

BIS GOFL ,R2 

CMP R2,Ri 

BEQ 304 

MOV R1,RO 

XOR R2,RO 

CMP RO, ONBA 

BEQ 303 

ERRHRD ERRNO, T7SREU,PKTSSR 
CKLOOP 

BIT ONBA,R1 

BNE 35$ 


ERRHRD ERRNO, T72NBA,PKTSSR 


SEQ 0137 
sDEVICE FATAL SSR FAILED TO SET 
TRAP cs 
725 
-WORD T7SSR 
.WORD PKTSSR 
sLOOP ON ERROR, IF FLAG SET 
TRAP CSCLP1 
sBY-PASS SUBTEST IF FATAL ERROR 
TRAP ene 
sDID AN INTERRUPT OCCUR ? 
sBRANCH IF NOT 
TRAP CSERHRD 
-WORD 726 
«WORD T7INT 
sGET THE CONTENTS OF TSSR 
sEXPECTED CONTENTS OF TSSR 
iTS OFF -LINE ey SET ? 
’ IF_NOT OFF-LINE 
sSET OFF-LINE IN EXPECTED DATA 
5 CTED MATCH RECE ? 


sF IND ERROR 
oFe A eT Oe ee I 
;DON’ T PRINT ERROR IF NBA ONLY BAD BIT 
sCOMMAND NOT REJECTED 
AP C#ERHRD 
-WORD 727 
. T7SREJ 
«WORD PKTSSR 


sLOOP ON ERROR ? 


sIS NBA BIT SET ? 
sOKAY IF NBA SET 
sNBA NOT SET 


3<<<<<¢¢¢¢¢¢¢¢ END SEGMENT <cceeeeeeeeee 
0000$ : 
TRAP CsESEG 


sNEXT BUFFER LENGTH 

sHAVE ALL BAD VALUES BEEN TESTED ? 
sBRANCH IF ALL TESTED 

;BRANCH TILL BACK TO ZERO 


sNAAANANANANAN END SUBTEST N\ANAANAANAANA 
L10062: 
TRAP CsESUB 


til 


1615 032706 
032706 


1616 
1617 032710 


62 
1634 032764 
1635 Ose 7 70 
1636 032772 
032772 
032774 


CHARACTERISTICS 
1 
005737 002224 
001002 
104432 
001612 

737 034412 
ry thr 000000 
012703 002766 
0127 033230 
012737 
0127 000012 
104404 
004737 016054 
103405 
010001 
104455 
001331 
003652 
012104 
005037 002220 
005037 002222 
010465 000000 
004737 016416 
103407 
010001 
104455 
001332 
034031 
012116 
005237 002220 
104406 
104410 
0001 
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iTEST 7, SUBTEST 6 
;THIS SUBTEST IS EXECUTED ONLY IF THE EXTENDED 


ATURES MODE 
sXST2 AFTER A PREVIOUS EXE 


ENABLED CAS 


eee BY EXAMINING 
E OA Groko terete 


SEQ 01386 


CUTION OF WRIT 
sIT VERIFIES THAT A FIFTH CHARACTERISTICS DATA WORD IS F 


31F THE BYTE COUNT 
;0R GREATER. 
3 
. BGNSUB 
TST EXTFEA 
BNE 43 
EXIT TST 
4$: JSR PC, T7REST 
SETPRI #PRIOO 
MOV OTSTBLK+12. ,R3 
MOV OTTPACKET ,R4 
MOV $200, 
- MOV #10. .PKBCNT(R4) 
‘ BGNSEG 
JSR PC, SOFINIT 
oss 104 
ERRDF ERRNO, SFIERR,SFIMSG 
10$: CLR FATFLG 
CLR INTRECV 
MOV R4, TSOBCRS) 
JSR * CHKTS 
mor Aim 
ERRDF ERRNO,T7SSR,PKTSSR 
INC FATFLG 
15$: CKLOOP 
ESCAPE SEG 


TCHED 
PARAMETER IN THE COMMAND PACKET IS 10 DECIMAL 


AAA ALL LAA orn SUBTEST /////////447 


6: 

TR C#6SU8 
:IS EXTENDED FEATURES SOFT SET? 
:8R, IF SOFTWARE SWITCH IS SET (ON) 
sNO EXTENDED FEATURES ed a. TEST 
CsEXIT 
THORO L10055-. 

sSET PACKET TO START-UP VALUES 


sLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV @PRIOO RO 
TRAP C#SPRI 
sSTART OF TEST DATA 
sGET THE ADDRESS OF COMMAND PACKET 
sSPECIAL BIT SET FOR EXTFEA RAM RD 
sSTART WITH EXTENDED FEATURES VALUE 


$>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C$BSEG 


s00 SOFT INIT OF CONTROLLER 
sBR IF SOFT INIT = OK 
sSAVE CONTENTS OF TSSR 
;DEVICE FATAL ERROR oan J INIT 


CSERDF 
"WORD 729 
-WORD SFIERR 
-WORD SFIMSG 
sCLEAR FATAL ERROR FLAG 
sCLEAR INTERRUPT RECEIVED FLAG 
iSET THE PACKET ADDRESS 
sWAIT FOR SSR TO SET 
ry IF CARRY SET (GOOD RETURN) 
CONTENTS OF TSSR 
;DEVICE FATAL SSR FAILED TO SET 
TRAP CSEROF 
° 730 
T7SSR 
. PKTSSR 
sSET FATAL ERROR FLAG 
sLOOP ON ERROR, IF FLAG 
RAP CéCLPl 
sBY-PASS SUBTEST IF FATAL ERROR 
TRAP CSESCAPE 
-WORD 10000%-. 
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CHARACTERISTICS 


TEST 7: WRITE 


1637 032776 
1 033002 


1686 033176 


005737 
001404 


104456 
001334 
033370 
012116 


004 
015570 
012704 


104405 


002222 


033240 
011264 


033230 


000006 
003062 
032706 


002226 
000012 


22%: 


30%: 


35$: 


403%: 


TST 


— 
ERRNO, T7INT ,PKTSSR 


TSSRCRS),R1 
@SSR,R2 
@OFL ,R1 

25% 

OOFL ,R2 

R2,R1 

30 

ERRNO, T7NBA,PKTSSR 


PC ,CHKTSSR 
TSBACRS), RI 
OT7BFR,R2 
ta 

98177, XST2(R2) 
32 

02 :R2 

1,R2 


35 
ERRNO, T7TSBA , EXPREC 


OT7DATA,R4 
CKRAM2 


40 
ERRNO, PKTRAM, RAMERR 


OT7PACKET ,R4 


(R3)+,PKBCNT(R4) 
R3, @TBLEND 

553 

53 


;0ID AN INTERRUPT OCCUR ? 
;BRANCH IF NOT 
TRAP C$ERHRD 
.WORD 731 
"WORD T7INT 
"WORD PKTSSR 
:GET THE CONTENTS OF TSSR 
sEXPECTED CONTENTS OF TSSR 
s1S OFF-LINE BIT SET ? 
sBRANCH IF NOT OFF-LINE 
3SET OFF-LIN€ IN EXPECTED DATA 
sD0ES EXPECT ED MATCH RECEIVED ? 
}OKAY IF MATCH 
;NBA NOT ZERO 
TRAP § C$ERHRD 
.WORD 732 
"WORD T7NBA 
"WORD PKTSSR 
;LOOP ON ERROR ? 
TRAP  CS$CLP1 
;WAIT FOR READY, NON-AMBIGUOUS 
:GET TSBA REGISTER CONTENTS 
;START OF THE DATA BUFFER 
sIS ITA ODE 
sYES BR 
IS EXTENDED FEATURES BIT SET ? 
BR IF EXTENDED FEATURES OFF 
sEXTRA WORD IF SPECIAL FEATURES 
sEXPECTED CONTENTS OF TSDA 
;COMPARE EXPECTED TO RECEIVED 
ERROR IF NOT EQUAL 
sPRINT THE ERROR & EXPD/RECY 
CSERHRD 
TORO 733 
"WORD T7TSBA 
[WORD EXPREC 
sSET POINTER FOR CHECKER 
1SEE IF DATA IN RAM Ts AGORRECT 
ANCH IF PACKET IN RAM IS CORRECT 
REPORT THE RAM ERRORCS) 
TRAP  C$ERHRD 
, 734 
"WORD PKTRAM 
"WORD RAMERR 


sRESET PACKET POINTER 
96<<6¢¢<¢CeCK< END SEGMENT <cceeeeeeeeece 


10000$ : 
TRAP CSESEG 


SEQ 0139 
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SEQ 0140 
TEST 7: WRITE CHARACTERISTICS 


1687 
1688 033202 55%: ENDSUB s\\ANAAANAANANN END SUBTEST \ANAANANANANN 
033202 L10063: 
033202 104403 TRAP CsESuUB 
1690 033204 005737 002220 TST FATFLG sANY FATAL ERRORS ? 
1691 033210 001402 BEQ 60$ sBRANCH IF NOT 
1692 033212 004737 017262 JSR PC ,CKDROP sTRY TO DROP THE UNIT 
1693 033216 60$: 
3321 EXIT TST ;ALL DONE THIS TEST 
33216 104432 TRAP CsEXIT 
033220 001240 -WORD L10055-. 
1695 
1696 3° 
1697 sLOCAL STORAGE FOR THIS TEST 
1698 t- 
1699 
1701 033222 -BLKB 10-<.-TSV2E7> 
1703 033230 T7PACKET: sCOMMAND PACKET FOR TEST 
1704 033230 100004 -WORD 100004 sWRITE CHARACTERISTICS COMMAND, WITH ACK 
$703 Oeeses 033240 .~ WORD _— sADDRESS OF CHARACTERISTICS BLOCK 
Bad 033236 000010 -WORD 68. sSTARTING VALUE OF BLOCK SIZE 
1709 033240 T7DATA: sCHARACTERISTICS DATA BLOCK 
1710 033240 033256 .WORD T7BFR sADDRESS OF MESSAGE BUFFER 
1711 033242 -WORD O 
1712 033244 000016 -WORD 14. sLENGTH OF MESSAGE BUFFER 
1713 033246 000000 -WORD O 
4735 033250 000000 T7SP: -WORD O sEXTFEA EXTRA WORD 
1716 033252 000000 000000 -WORD 0,0 3s SPACE 
$732 033256 T7BFR: .BLKW 8. sMESSAGE BUFFER 
1719 8° 
1720 3 
+7eh sTEST DATA FOR SUBTEST TWO 
3 
1738 sDATA HAS FORMAT: 
1725 3 1ST WORD OFFSET TO TEST “ane IN PACKET 
17<8 3 2ND WORD BITS TO SET FOR TEST 
3 
1726 3 
ie 
1 033276 T72DATA: 
1731 033276 000000 037140 -WORD O,BITS!BIT6!:BIT9!BIT1O!BIT11!:6IT12:B1T13 
1732 033302 000002 000001 -WORD 2,BITO 
1733 033306 000004 100100 -WORD 4,61IT6!6IT15 
1734 033312 T72D0NE=. 
1735 
1736 
1737 4° 
1738 sLOCAL TEXT MESSAGES FOR TEST 
He - 
1741 033312 116 102 101 T72NBA: .ASCIZ ‘NBA Not Set On Rejected WRITE CHARACTERISTICS’ 


Lili 
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TEST 7: WRITE CHARACTERISTICS 
033370 


SEQ 0141 


‘WRITE ACTERISTICS Commend Not 
ro Unused F ields' 


| od aud and and ad 


oo ope 
SEEEce 


T7TSBA: . 
TST7IO: ‘Write ot ER 


t¢ 


; ROUTINE TO RESTORE COMMAND PACKET TO START-UP (DEFAULT) VALUES 
’ 
t- 


T7REST: 
sSAVE THE REGISTERS 
START OF THE PACKET 
sWRITE gag hay WITH ACK 
sADDRESS OF CHAR DATA BLOCK 


1EX ENDED ADDRESS 
iSIZE OF DATA BLOCK IN BYTES 
sADORESS OF MESSAGE BUFFER 


C(R1)- 

5 fmt sLENGTH OF MESSAGE BUFFER 
CR1) 

PC sRETURN 


L100SS: 
TRAP CsETST 


-SBTTL TEST 8: VOLUME CHECK 


THIS TEST VERIFIES THAT THE VOLUME CHECK ( vox? BIT, A FLAG HELD 
WITHIN THE M7196 AND xSTO, IS BY INITIALIZE AND 
ACTERISTICS COMMAND WITH THE 
A WRITE ACTERISTICS 
STATE OF The 
MOTION COMMAND 
WHETHER VOLUME CHECK IS SET OR CLEAR, IS NOT CHECKED BY THIS 
TEST; THIS FUNCTIONALITY IS CHECKED IN THE INDIVIOUAL TESTS OF 
TAPE MOTION COMMANDS. 


THE TEST PROCEEDS AS FOLLOWS: 
1. THE CONTROLLER IS INITIALIZED BY WRITING INTO THE TSSR. 


2. A WRITE CHARACTERISTICS COMMAND IS ISSUED (WITH CVC=0) 
AND XSTO IN THE RETURNED MESSAGE BUFFER IS EXAMINED; 





Mii 


TSVSA - HARDWARE TESTS MACRO VOS.03 Tuesday 26-Apr-87 10:28 Page 85-36 
TEST 6: VOLUME CHECK 
THE VCK BIT SHOULD BE CLEAR (0). 


THE PREVIOUS STEP IS REPEATED TO VERIFY THAT VCK DOES 
NOT CHANGE (REMAINS AT 0). 


A WRITE CHARACTERISTICS COMMAND IS ISSUED WITH CVC=1 
AND THE VCK BIT IN XSTO IN THE MESSAGE BUFFER IS 
EXAMINED; THE VCK BIT SHOULD BE CLEAR (0). 


A WRITE CHARACTERISTICS COMMAND IS ISSUED WITH CvC=0 
AND THE VCK BIT IN XSTO IN THE MESSAGE BUFFER IS 
EXAMINED; THE VCK BIT SHOULD REMAIN CLEAR (0). 


18 
@TSTBID,RO }ASCII MESSAGE TO IDENTIFY TEST 
PC, TSTSETUP :00 INITIAL TEST SETUP 
$20. , LOOPCNT sPERFORM 20 ITERATIONS 


sPACKET FOR WRITE CHARACTERISTICS 
a= 


MOV 
JSR 
MOV 
MOV 
JSR 
BCS 
MOV 
ERROF 


sLOOP ON ERROR, IF FLAG 
sEXIT IF FATAL ERROR 
OTEBFR ,R2 
OXSOVCK , XSTOCR2) 


Fesaces) a1 


» TENVCK , PKTMES 


TRAP C#c.P1 
sSET THE PACKET ADDRESS FOR WRITE CHAR 
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016416 


—— 


Ri 
ERRNO, T8SSR,PKTSSR 


TST 
@XSOVCK , XSTOCR2) 


pb ee PE Ri 
ERRNO, TANVCK ,PKTMES 


Ra Te08CRS9 

PC 

ia 

ERAND, TESSR,PKTSSR 


TST 


OXSOVCK , XSTOCR2) 


40s 
TSSRCRS), RI 
CAND FONE PKTHES 


PR 


ERAND, TASSR,PKTSSR 


sWAIT rae - T 
3BR IF CARR 


SAVE 
ISAVE CONTENTS 


sLOOP ON ERROR, IF FLAG 

sEXIT IF FATAL ERROR 

sIS VOLUME CHECK SET 

sOKAY IF Mt ye Is Sey 
—— 


sCONTENTS 
3 VOLUME eyecx 


BIT 
sSET_THE BACKET ADDRESS FOR WRITE CHAR 
sWAIT FOR SSR TO ra 


s8R IF CARRY SET 
s SAVE ENTS OF 
:DEVI FATAL SSR FAILED _TO SET 


sLOOP ON ERROR, IF FLAG § 
sEXIT IF FATAL ERROR 


niet 


sLOOP ON ERROR ? 
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035006 012116 . WORD 
1895 035010 4S$: sLOOP ON ERROR, IF FLAG SET 
035010 TRAP 


1 CscLP1 
18696 035012 TST sEXIT IF FATAL ERROR 
035012 


TRAP CSESCAPE 
10064-. 


«WORD L 
@XSOVCK , XSTOCR2) sIS_ VOLUME CHECK CLEAR IN XSTO ? 
sOKAY IF VOLUME CHECK IS CLEARED 
TSSRCRS),R1 sCONTENTS OF TSSR FOR ERROR REPORT 
ERRNO, TEVCK ,PKTMES sVOLUME CHECK NOT CLE aap ce 


«WORD 8609 
-WORD TSVCK 
-WORD  PKTMES 


50$: sLOOP ON ERROR ? 
CsCLP1 


TRAP 
604: PC, TSTLOOP sSHOULD WE DO ITERATIONS ? 
$ ANCH IF NOT 
we T8LOOP 
62$: TST 
CSEXIT 
L10064- 


1911 {LOCAL STORAGE FOR THIS TEST 
+or8 s- 

1915 035062 10-<. -TSV2E7> 
1917 035070 


sCOMMAND PACKET FOR TEST 
100004 sWRITE CHARACTERISTICS COMMAND 
—_— sADORESS OF CHARACTERISTICS BLOCK 
sSTARTING VALUE OF COUNTER 


sCHARACTERISTICS DATA BLOCK 
sADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 


-BLKB 
. WORD 
- WORD 
. WORD 
. WORD 
- WORD 

WORD 
. WORD 

WORD 

BLKW 


TSBFR: sMESSAGE BUFFER 


Cleared’ 

) Not Cleer After Initialize (XSTO)’ 

Weteib ncorrect After Write recter istics’ 
$ 


L10064; 
TRAP CSETST 


TEST 9: COMPLETION INTERRUPT 
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TEST 9: COMPLETION INTERRUPT 


THIS TEST VERIFIES THAT AN 


THE 
aeeLs +i5> OxT aN THE 
SSING OF tre Ie BIT. 


SEQUENCE 
SERVICE ROUTINE IS SET 
CHARACTERISTICS COMMAND I 


a3 XY VERIF 
GENERAT ED. 

FIRST WITH IE=1 AND THE 
NO T IS GENERATED AFTER 


SEQ 0145 


IS GENERATED AT THE 


INTERRUPT 
WRITE eS teach coke eg Be IF THE INTERRUPT 
THE INTERRUPT LO Loci 


THIS TEST 
AND BASIC 


S OF ee ARE REPEATED, EXCEPT THAT THE yy a a 


sI 
HESSAGE PACKET. mraz 


UP 10 EXPECT 
Gi THAT 


AND EACH WRITE 

a THE IE BIT SET (1). IT 
Ly IE STATUS BIT IN XSTO 
A COMPLETION INT Is 


FINALLY, A SEQUENCE OF TWO 


INTER WUP 
I€ BIT IN XSTO IS O. 


ST 


EXTFEA 
@TST9ID,RO 
PC, TSTSETUP 
$20. ,LOOPCNT 


PC, TOREST 
oPRIOO 


@TSTBLK+10. .R3 
STSPACKET R4 
$8. , PKBCNT(R4) 


PC, SOFINIT 
03 


AL 
ERRNO, SFIERR, SFIMSG 


FATFLG 
INTREC 


SECOND 


COMMANDS ARE ISSUED, THE 
TH JE*0. IT IS VERIFIED THAT 
HE SECOND COMMAND AND THAT THE 


Ee EXTENDED reA S$ SWITCH 
TO IDENTIFY TEST 


I_ MESSAGE 
:00 INITIAL TEST SETUP 
sPERFORM 20 ITERATIONS 


s4//4/14/4111//7/ BEGIN SUBTEST //////////// 
“*F TRAP ss C48SUB 
sSET PACKET TO INITIAL VALUES 
;LOWER PRIORITY TO ALLOW INTERRUPTS 
MOV @PRIOO RO 
TRAP CsSPRI 
sSTART OF TEST DATA 
3sGET THE ADDRESS OF COMMAND PACKET 
sSTART WITH MINIMUM ALLOWABLE VALUE 
3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C&BSEG 
300 SOFT INIT Conan 
3s6R IF SOFT 
sSAVE CONTENTS OF” 18k 
iDEVICE FATAL ERROR CURING ptt 
. WORD 


sCLEAR FATAL ERROR FLAG 

sCLEAR INTERRUPT RECEIVED FLAG 

b THE PACKET ADDRESS 

sWAIT Fo 19 

he Soe ts RETURN) 

‘ 

DEVICE FATAL SSR FAILED TO SET 
TRAP gsgrer 
. WORD 





D12 
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035514 
035516 
1999 035520 
2000 Oeease 


65%: 
708: 


s¢ 


FATFLG © 


INTRECV 


ERRNO, TONINT ,PKTSSR 


TSSRCRS),R1 
@SSR ,R2 


25% 
OOF L 
R2,R 


(R3)+,PKBCNT(R4) 
R3, @TBLEND 


$ 


FATFLG 

60% 

PC, CKDROP 

H REV 
TIBFR+12,¢B81T7 
70% 

EXTFEA 


TEST 9, SUBTEST 2 


i CHECK THAT UNUSED BITS BEING SET CAUSES 


T9SSR 
SET FATAL ERROR FLAG sta 
}LOOP ON ERROR, IF FLAG SET 


sBY-PASS SUBTEST IF oo 


CscLP1 


:0I0 AN INTERRUPT OCCUR ? 
sBRANCH IF YES 


CSERHRD 
904 
TONBA 
PKTSSR 
3<<¢<eeecececee END SEGMENT <<<eeeeeeeee< 
10000: 
TRAP CsESEG 


ee Re TEST WORD 
ALL DATA BEEN TESTED 


BO Fe RATA PBS 


sN\AAANANANNNN END SUBTEST \ANAAAAAAAANN 
L10066: 
TRAP C4ESUB 
:ANY FATAL ERRORS ? 
s6R I 
ORY TO DROPCTHE UNIT 
118 Z1 A NEW MICROCODE 
EXTENDED FEATURES SET? 


sBR_ IF NO 
sSET EXT FEATURE FLAG 
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SEQ 0147 


sWRITE CHARACTERISTICS COMMAND TO BE REJECTED 
3 
LALLA ALLA ee SAAAAASASSAS 
TRAP C#6SUB 


sLOWER PRIORITY TO ALLOW INTERRUPTS 
@PRIOO,RO 


TRAP C4SPRI 
START OF TEST DATA FOR SUBTEST 
REC TORE PACKET TO STARTING VALUES 


3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C$BSEG 


R 
» SFIERR , SFIMSG 


WORD 
INTRECV sCLEAR INTERRUPT RECEIVED FLAG 
R4,RO sSTART OF THE P 
crs) RO sOFFSET TO THE DATA WORD TO TEST 
acrs) (RO) 


3SET THE DATA BITS TO BE TESTED 
T$6¢ RS) SET Pp ADDRESS 
PC 
a3, 
ERRNO, T9SSR,PKTSSR 


sLOOP ON ERROR, IF FLAG <i. 
SEG sBY-PASS CHECKS IF —_ 


INTRECV s0ID AN INTERRUPT OCCUR ? 
22% BRANCH IF YES 
ERRNO, TONINT , PKTSSR 





Fie 
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SEQ 0146 
TEST 9: COMPLETION INTERRUPT 


0 001404 Q 30 OKAY IF MATCH 

3938 O3e8se ERRHRD ERRNO, T9OREU, PKTSSR COMMAND NOT REJECTED 
036046 104456 AP —- CSERHROD 
036050 001614 ’ $08 
036052 037801 “WORD T92REU 
036054 012116 ‘WORD PKTSSR 
036056 30$: 

2097 036056 ENDSEG 3<<<eeeeeeeece END SEGMENT <cceeeceeeeeec 
036056 100006 : 
036056 104405 TRAP CS$ESEG 
036060 062703 000004 ADD 04,R3 sPOINT TO NEXT DATA PAIR 

£18; gudee fetag, O87 fas jim Ses aoa Fes 2 

2102 036072 137 035702 UMP 56 1 BRANCH Tu BACK TO ZERO 

2104 036076 59%: ENDSUB s\NNNANANANANN END SUBTEST N\ANANNANANANN 
03607; L10067: 

a 036076 104403 TRAP C#ESUB 

21 2° 

210 3 

$105 sTEST 9, SUBTEST 3 

2110 }CHECK THE WRITE CHARACTERISTICS COMMAND IS REJECTED 

2111 sIF ISSUED WITH AN INVALID DATA BLOCK BYTE COUNT 

Stia t- 

2115 aap ed BGNSUB 4444444444644 a ome SAAAAGAAASSA 
036100 104402 “"F TRAP ss C#BSUB 

2117 036102 SETPRI #@PRIOO sLOWER PRIORITY TO ALLOW INTERRUPTS 
036102 012700 000000 @PRIOO,RO 
036106 1 TRAP  C$SPRI 

2118 036110 012703 000001 MOV #1,R3 sSTARTING BYTE COUNT 

2119 036114 012704 037350 S$: MOV T 9p, sGET THE ADDRESS OF COMMAND PACKET 

2120 036120 004737 040446 JSR PC, TOREST sRESTORE PACKET TO STARTING VALUES 

2122 036124 BGNSEG 3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
036124 104404 TRAP CéBSEG 

2124 036126 004737 016054 JSR PC, SOFINIT :00 SOFT INIT OF CONTROLLER 
036132 103405 Ss 10% 38R IF SOFT INIT = 

2129 036134 010001 RO,R1 sSAVE CONTENTS OF TSSR 

2130 036136 ERRDF ERRNO, SFIERR,SFIMSG sDEVICE FATAL ERROR DURING INIT 
0361 104455 CSEROF 
036140 00161 ; 909 
036142 003652 : SFIERR 
036144 012104 IMSG 

2131 036146 005037 002222 108: CLR RECV sCLEAR INTERRUPT RECEIVED FLAG 

2132 036152 010364 000006 R3,.PKBCNT(R4) sINSERT THE BYTE COUNT FOR Test 

2133 036156 010465 000000 MOV R4, TSDBC ) sSET PACKET ADDRESS 

134 036162 004737 016330 JSR PC.WAIT sWAIT FOR SSR TO SET 
2135 036166 103405 BCS 153 1BR IF CARRY SET (C000 RETURN) 
2136 036170 010001 RO,R1 }SAVE CONTENTS OF T 
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SEQ 0149 
TEST 9: COMPLETION INTERRUPT 
2140 036172 ERROF ERRNO, T9SSR ,PKTSSR sDEVICE FATAL SSR FAILED TO SET 
036172 104455 TRAP CSERDF 
036174 001616 - WORD 910 
036176 040067 WORD T9SSR 
012116 . WORD PKTSSR 
2141 036202 15%: CKLOOP sLOOP ON ERROR, IF FLAG SET 
104406 TRAP CSCLPi 
2142 036204 ESCAPE SEG sBY-PASS SUBTEST IF FATAL ERROR 
036204 104410 TRAP CSESCAPE 
036206 P 10000$%- 
2143 036210 005737 002222 TST INTRECV :D0ID AN INTERRUPT OCCUR ? 
Sias osesie OO ERRHRD ERRNO, TONINT.PKTSSR seat Poe 
036216 044 TRAP CSERHRD 
0 001617 . WORD 911 
0401 ~ WORD TONINT 
036224 012116 - WORD PKTSSR 
2149 036226 016501 000002 22%: MOV TSSRCRS) sGET THE CONTENTS OF TSSR 
2150 036232 012702 102206 MOV PSC Son; TSREUINBA, R2 sEXPECTED CONTENTS OF TSSR 
2151 036236 032701 000100 BIT OOFL ,R1 31S OFF-LINE err SET ? 
Sieg 036242 001402 BEQ 25% sBRANCH IF NOT OFF-LINE 
2i 036244 052702 000100 BIS GOFL ,R2 1SET OFF - LIN IN EXPECTED DATA 
2154 036250 020201 25%: CMP Re, Ri sD0ES ag MATCH RECEIVED ? 
2155 036252 001404 BEG 30$ sOKAY IF MATCH 
2159 036254 ERRHRD ERRNO, T93REJ,PKTSSR sCOMMAND NOT REJECTED ; 
036254 104456 TRAP C$#ERHRD 
036256 001620 . WORD 912 
036260 037600 - WORD TO3SREJ 
036262 012116 WORD PKTSSR 
2169 036264 30$: 
2161 036264 ENDSEG 9<<<<¢¢<¢¢¢¢0¢¢ END SEGMENT <<ceeeeeeeeece 
036264 10000$: 
104405 TRAP CSESEG 
3 005203 INC R3 sNEXT BYTE COUNT 
2164 036270 020327 000006 CMP R3, 96 i TESTED ALL INVALID ? 
2165 036274 002002 BGE 593 sBRANCH IF TEST DONE 
si66 036276 000137 036114 JP } BRANCH TILL BACK TO ZERO 
2168 036302 59$: ENDSUB sN\\NANAAANANNN END SUBTEST \AAAAANAAAANA 
036302 L10070: 
036302 104403 TRAP CsESuUB 
2169 
2170 3° 
2171 8 
$i7¢ eel 9, SUBTEST 4 
2174 ; SUBTEST TO VERIFY THAT A WRITE CHARACTERISTICS COMMAND IS 
sits sREJECTED IF AN ILLEGAL DATA BLOCK ADDRESS IS ISSUED. 
FY 
3ifg ‘ 
2179 036304 BGNSUB 3/////41/4/4// BEGIN SUBTEST S/////////747/ 
036304 79.4: 
036304 104402 TRAP CsB8SuUB 


2160 
2161 036306 SETPRI #PRIOO sLOWER PRIORITY TO ALLOW INTERRUPTS 


Hie 
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SEQ 0150 
TEST 9: COMPLETION INTERRUPT 
036306 012700 000000 @PRIOO,RO 
1 Osesta b12703 037412 MOV TO2DATA,R ART ATA F Tea — 
e 
183 036320 012704 0373 S$: MOV SropacKet Rae ere THe ADBRESS OF COPMAND ER xet 
2184 036324 004737 040446 JSR Pe. TOREST. RESTORE PACKET 10 STARTING VALUES 
2186 
2187 036330 004737 016054 SR PC,SOFINIT ;00 SOFT INIT OF CONTROLLER 
2188 036334 103405 BCS 10% :8R IF SOFT INIT = OK 
2192 036336 010001 MOV RO,R1 3SAVE CONTENTS OF TSSR 
2193 036340 ERROF ERRNO, SFIERR,SFIMSG ;DEVICE FATAL ERROR DURING INIT 
036340 304455 TRAP C#EROF 
Osesaa oosess “WORD ef TERR 
036346 012104 “WORD SFIMSG 
2194 036350 005037 002222 108: CLR RECV sCLEAR ERRUPT RECEIVED FLAG 
2195 036354 052737 000001 037360 BIS $1, TSDATA RAKE” ADDRESS 
2196 036362 010465 MOV » TSOBCRS) ere THE P 
97 036366 004737 016330 JSR PC; WAITF ;WAIT FOR SSR TO SE 
2198 036372 10 BCS 153 3BR IF CARRY SET (GOOD RETURN) 
2199 036374 010001 MOV RO,R1 sSAVE CONTENTS OF TSSR 
036376 ERRDF ERRNO, T9SSR,PKTSSR sDEVICE FATAL SSR FAILED TO SET 
036376 104455 TRAP C$EROF 
036400 001622 .WORD 914 
036402 040067 "WORD T9SSR 
036404 012116 "WORD PKTSSR 
2204 036406 15$: | CKLOOP sLOOP ON ERROR, IF FLAG SET 
036406 104406 TRAP  ‘CSCLP1 
2205 036410 ESCAPE SUB :BY-PASS SUBTEST IF FATAL ERROR 
036410 104410 TRAP  CSESCAPE 
036412 . L10071- 
2206 036414 005737 002222 TST INTRECV ;DID AN INTERRUPT OCCUR ? 
2207 036420 001004 BNE 22% ;BRANCH IF YES 
2211 036422 ERRHRD ERRNO, TONINT,PKTSSR 
036422 104456 TRAP C#ERHRO 
Osease oad18e “GORD TONINT 
036430 012116 s PKTSSR 
2212 036432 016501 000002 22: MOV TSSRCRS),R :GET THE CONTENTS OF TSSR 
2213 036436 012702 102206 MOV p8C SSR! TSREUINBA,R2 sEXPECTED CONTENTS OF TSSR 
2214 036442 032701 000100 BIT OOFL RI 31S OFF-LINE BIT SET ? 
2215 036446 001402 BEQ 25$ ;BRANCH IF NOT OFF-LINE 
2216 036450 052702 000100 BIS OOFL ,R2 }SET OFF-LINE IN EXPECTED DATA 
2217 036454 020201 258: CMP R2,Ri DOE EXPECT TED MATCH RECEIVED ? 
2218 036456 001404 BEG 304 }OKAY IF MA 
2222 036460 ERRHRD ERRNO, T94REU,PKTSSR s COMMAND NOT REJECTED 
036460 104456 TRAP §C$ERHRD 
036462 001624 .WORD 916 
036464 037673 "WORD T94REU 
036466 012116 "WORD PKTSSR 
2225 036470 30$: 
2225 036470 ENDSUB s\\\NANNANANANN END SUBTEST \ANAAANANAANAAN 
036470 L10071: 
036470 104403 TRAP Ss CSESUB 
2226 
2227 
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SE@ 0151 


i id 
iTEST 9, SUBTEST 5 


} CHECK THAT WRITE CHARACTERISTICS COMMAND IS REJECTED IF _ THE 
sMESSAGE BUFFER LENGTH SPECIFIES AN INVALID COUNT (LESS THAN 14) 
‘ 

ge 


BGNSUB 4444444444474 Coa eres SAAAAASAASSS 
°F TRAP C#B8SUB 
SETPRI #PRIOO ;LOWER PRIORITY TO ALLOW INTERRUPTS 
MOV @PRIOO,RO 
TRAP C$SPRI 
sSTARTING BUFFER LENGTH 
sTSPACKET, R4 :GET THE ADDRESS OF COMMAND PACKET 
PC, TOREST sRESTORE PACKET TO STARTING VALUES 


3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C$BSEG 


MOV 


PC, SOFINIT ;00 SOFT INIT OF CONTROLLER 
103 i0R IF SOFT INIT = OK 
RO,R1 sSAVE CONTENTS OF TSSR 
ERRNO, SFIERR, SFIMSG ;DEVICE FATAL ERROR DURING INIT 


. WORD 
sCLEAR_INTERRUPT RECEIVED FLAG 
peer — BAD MESSAGE LENGTH 

ADDRESS 


15 
RO,R1 SAVE CONTENTS OF TSSR 
ERRNO, T9SSR,PKTSSR sDEVICE FATAL SSR FAILED 10, SET 


sLOOP ON ERROR, IF FLAG SET 
sBY-PASS SUBTEST IF FATAL ERROR 
RAP 


;CID AN INTERRUPT OCCUR ? 
sBRANCH IF YES 


sGET THE CONTENTS 
sEXPECTED CONTENT 
sIS OFF-LINE BIT 








Jle 
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2274 036634 BEQ 25% sBRANCH IF NOT OFF-LINE 
000100 GOFL ,R2 3;SET OFF-LINE IN EXPECTED DATA 
CMP R2,R1 3D0ES EXPECTED MATCH RECEIVED ? 
30 OKAY IF MATCH 
ERRNO, T9SREJ,PKTSSR sCOMMAND NOT REJECTED 
TRAP — 


- WORD 
«WORD TISREJ 
012116 . WORD 


reacaeececeeaas = SEGMENT <<<ceeeceeeece 
104405 “ TRAP CSESEG 


005203 R3 sNEXT BUFFER LENGTH 
020327 CMP sHAVE ALL BAD VALUES BEEN TESTED ? 
59 sBRANCH IF ALL TESTED 
sBRANCH TILL BACK TO ZERO 


sNANNANANANANN END SUBTEST NAANANANNANAS 
L10072: 


* TRAP CsESUB 
| ad 


;TEST 9, SUBTEST 6 


‘ 
nes SUBTEST IS EXECUTED ONLY IF THE EXTENDED 

sFEATURES MODE IS ENABLED CAS DETERMINED BY EXAMINING 
ixST2 AFTER A_PREVIOUS EXECUTION OF WRITE CHARACTERIST 103), 

s1T a a > THAT A FIFTH Src TERT ST ICS gs WORD IS FETCHED 
VIF THE BYTE COUNT PARAMETER IN THE COMMAND PACKET IS 10 DECIMAL 
sOR GREATER. 
; 
t- 

ALAA orepe SUBTEST S///////4/47/ 


-O: 
TRAP  C$BSUB 
IS EXTENDED FEATURES SOFT. SW SET? 
IF SOFTWARE SWITCH IS SET (ON) 
vextt SUBTEST 
PACKET TO START-UP VALUES 


sLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV @PRIOO RO 
TRAP C#SPRI 
STSParket Ra oR3 sSTART OF TEST DATA 


sGET THE ADDRESS OF COMMAND PACKET 
010. ,PKBCNT(R4) sSTART WITH EXTENDED FEATURES VALUE 
2314 036742 3>>>>>>>>>>>> BEGIN seer >>>>>>>>>>>> 
036742 TRAP C$BSEG 


2315 
2316 036744 JSR PC, SOFINIT 1D0 SOFT INIT OF CONTROLLER 
2317 036750 103405 108 :BR IF SOFT INIT = OK 
2321 036752 MOV RO,R1 sSAVE CONTENTS OF TSSR 
2322 036754 ERRNO, SFIERR , SFIMSG ;DEVICE FATAL ERROR DURING JNIT 


CSEROF 





K1i2 


.*) 6 
2333 037020 
2334 037024 


9) 
2335 037026 


2365 
2366 


002220 
002222 
000000 
016416 


002220 


002222 


000006 
003062 
036742 


10%: 


15$: 


22%: 


25%: 


30%: 


S5$: 
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FATFLG 
INTRECV 
R4, TSOBCRS) 
PC. CHKTSSR 


1 
RO,R1 

ERRNO, T9SSR,PKTSSR 
FATFLG 


SEG 


INTRECV 
ERRNO, TONINT ,PKTSSR 


Teena) Ma 


ERRNO, TONBA,PKTSSR 


TEST 9, SUBTEST 7 


SEQ 0153 
-WORD 921 
-WORD SFIERR 
-WORD SFIMSG 
a4 FATAL ERROR FLAG 
sCLEAR INTERRUPT RECETVED FLAG < 
sSET_ THE PACKET ADDRESS 
sWAIT FOR SSR TO SET 
sBR IF C SET (GOOD RETURN) 
sSAVE CONTENTS OF TSSR 
;DCVICE FATAL SSR FRELED, 4 ® SET 
CS#ERDF 
"WORD 922 
ari T9SSR 
PKTSSR 
sSET FATAL ERROR FLAG 
sLOOP ON ERROR, IF FLAG 1 
CsCLP1 
sBY-PASS SUBTEST IF FATAL RERROR 
TRAP CSESCAPE 


~we 


sO0ID AN oo OCCUR 


sBRANCH IF 
TRAP CSERHRD 
-WORD 923 
«WORD TONINT 
-WORD PKTSSR 


sDOES EXPE MATCH RECEIVED ? 

sOKAY IF MATCH 

sNBA NOT ZERO 
TRAP CSERHRD 
-WORD 924 
-WORD TONBA 
-WORD PKTSSR 


3<<eeeeeeeecee END SEGMENT <cceeeeceeeec 
10000$ : 
TRAP CSESEG 


sSET THE TEST WORD 

sHAS ALL DATA BEEN TESTED ? 

}BRANCH IF ALL DATA DONE 

sBRANCH TILL BACK TO ZERO 

aN\\NANANAAAANN END SUBTEST \ANAAANANAANAAN 
L10073: 


TRAP CsESUB 


Lic 
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TEST WRITE CHARACTERISTICS WITH/WITHOUT INTERRUPTS ENABLED 
c 
5371 re 
2372 037130 34//////////4 BEGIN SUBTEST /////////74/7/ 
037130 “78 


037130 TRAP C$B8SUB 


2374 037132 sLOWER PRIORITY TO ALLOW INTERRUPTS 
037132 MOV @PRIOO,RO 


THE ADDRESS 


RO,R1 TSSR 


sSAVE CONTENTS OF 
ERRNO, SFIERR, SFIMSG sDEVICE FATAL ERROR AA pe! 
- WORD 


INTRECV ;CLEAR INTERRUPT RECEIVED FLAG 
8117 42 

R4,TSOB 
PC, CHKT 
ERRNO, 


CR4 sENABLE INTERRUPTS 
CRS) PACKET 
SSR 
sSAVE CONTENTS OF TSSR 
T9SSR,PKTSSR sDEVICE FATAL SSR FALED TY. SET 
WORD 
. WORD 
sLOOP ON ERROR, IF FLAG 7 
sBY-PASS SUBTEST IF me a 


37230 02 P 
2396 037232 005735 INT sDID AN INTERRUPT OCCUR 
2397 037236 BNE sBRANCH IF YES 
2401 037240 

sLOOP ON ERROR ? 


sCLEAR INTERRUPT RECEIVED FLAG 
sOISABLE po ned 
SET ACKET 
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-WORD T9SSR 


LOOP ON ERROR, IF FLAG SET sho 
3 o 
037306 TRAP _ CSCLP1 
2415 037310 suB ;BY-PASS SUBTEST IF FATAL ERROR 

037310 TRAP CS#ESCAPE 

037312 000020 ¥ L10074-. 
2416 037314 INTRECV ;0I1D0 AN INTERRUPT OCCUR ? 
2417 037320 30$ sBRANCH IF NOT 

1 037322 ERRHRD ERRNO, T9INT,PKTSSR 

037322 CSERHRD 
929 
TSINT 
PKTSSR 
gs V\\ANAANANANANN END SUBTEST \ANANAANANAAAANA 

L10074: 
TRAP © CSESUB 


EXIT TST sALL DONE THIS TEST 
TRAP CsExIT 
-WORD 110065-. 


}LOCAL STORAGE FOR THIS TEST 
g= 

. 10-<. -TSV2E7> 
TOPACKET: sCOMMAND PACKET FOR TEST 
;WRITE CHAR COMMAND, WITH IE, ACK 
sADORESS OF CHARACTERISTICS BLOCK 
sSTARTING VALUE OF BLOCK SIZE 


sCHARACTERISTICS DATA BLOCK 
sADORESS OF MESSAGE BUFFER 


100204 
~ 


BLKB 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
BLKW 


sLENGTH OF MESSAGE BUFFER 


TSBFR: 
- 

STEST DATA FOR SUBTEST TWO 
;DATA HAS FORMAT: 
i 5 188 


sMESSAGE BUFFER 


OFFSET TO TEST WORD IN PACKET 
BITS TO SET FOR TEST 


037412 
2460 037412 0. BITS!:6176!BIT9:B1T10!:B1T11!B1T12:81T13 
2461 037416 T 
2462 037422 


4,8116!61T15 





Nie 


TSVSA - HARDWARE TESTS MACRO VOS.03 Tuesday 28-Apr-87 10:28 Page 85-50 
TEST 9: COMPLETION INTERRUPT 
037426 T92D0NE=. 


SLOCAL TEXT MESSAGES FOR TEST 


* WRITE CHARACTERISTICS Command Not P 
"WRITE CHARACTERISTICS Not Re } Non-Zero Unused Fields’ 
N. t ae . . Cc t’ 


Re 
Not Re 
After WRI 
ived 
ved On WRITE ACTERIS 
WRITE CHARACTERISTICS’ 


th 
th 


TOTSBA: t 
TST9ID: ‘Completion Interrupt’ 


3° 
; ROUTINE TO RESTORE COMMAND PACKET TO START-UP (DEFAULT) VALUES 
. 
%- 


TOREST: 
SA THE REGISTERS 


STOPACKET . 
San “At iat Sopeieae TCS WITH ACK, IE 


sexteae SS 

sSIZE DATA BLOCK IN BYTES 
sADORESS OF MESSAGE BUFFER 
sLENGTH OF MESSAGE BUFFER 


sCLEAR 1ST LOC IN MESSAGE BUFFER 
RT sRETURN 
ENDTST 
L1006S: 
TRAP CsETSsT 
ity TEST 10: BASIC PACKET PROTOCOL 


WD. THe FUTON OF We ACK GIT IN THE COEOD HEADER WORD, 


AND THE REGISTER MODIFICATION REFUSED (RMR) 


TEST 10 SUBTEST 1 
Paes wer iy Bs 


’ 
8 
8 
’ 
3 
se 
’ 
8 
A 
+ CROPERL nate 

OP oTHE: “Ie" BIT IS mT Is GENERATED EVEN 





Bis 
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TEST 10: BASIC PACKET 
2518 


3520 oaos22 


: 


710 
@TSTI0ID, RO ‘ASCII MESSAGE 10 IDENTIFY TEST 
TSTSETUP 300 INITIAL TEST SETUP 
$20. , LOOPCNT sPERFORM 20 ITERATIONS 


: 


ALLL econ — SAAAAAAASSSS 
. : 
C$6SUB 


sSET PACKET TO INITIAL VALUES 
sLOWER PRIORITY TO ALLOW INTERRUPTS 
MOV @PRIOO,RO 


TRAP C$SPRI 
sGET THE ADDRESS OF COMMAND PACKET 
sSTART WITH MINIMUM ALLOWABLE VALUE 
3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 

TRAP C$BSEG 


ns a OB 
HES ROE HE 


sCLEAR FATAL ERROR FLAG 
sCLEAR INTERRUPT RECEIVED FLAG 
P ADORE SS 


IF CARR 
SAVE CONTENTS OF T 
sDEVICE FATAL SSR 


1002 
T10SSR 
PKTSSR 


FATFLG ;SET FATAL ERROR FLAG — 
sLOOP ON ERROR, IF FLAG SET 


SEG sBY-PASS SUBTEST IF ae Me 


Cs#cLP1 


INTRECV sDID AN INTERRUPT OCCUR 
22% sBRANCH IF YES 
ERRNO, TLONINT ,PKTSSR 


TSSRCRS),R1 sGET THE CONTENTS OF 
OSSR ,R2 sEXPECTED CONTENTS OF 





000100 
000100 


a 


Os ; 


OOFL RI 
256 
R2 + te 


303 
ERRNO, TLONBA,PKTSSR 


#100212, hes 


PC: CHK R4,T 
oon 
ERRNO, T10SSR,PKTSSR 


FATFLG 


INTRECV 
ERRNO, TLOINT ,PKTSSR 


TSSR(RS),R1 
GOFL;>R1 

55$ 

GOFL .R2 
R2,Ri 


60 
ERRNO, TLONNBA,PKTSSR 


sIS OFF-LINE BI 
BRANCH 


3<<<<¢¢¢¢¢¢¢0¢¢ END SEGMENT <<<<<<<4<<000¢ 


$: 
TRAP CsESEG 
3>>>>>>>>>>>> BEGIN or. >>>>>>>>>>>> 
C$BSEG 


ENTS OF 
;DEVICE FATAL SSR FRED Te. SET 


SET FATAL ERROR FLAG — 
1 EOP ON ERRORS IF FLAG $ 


sDID AN INTERRUPT OCCUR 
BRANCH IF NO 


tl MESSAGE BUFFER 


ioe EXPECTED DATA 


Tr oc EQUAL > 
Ba, Jr om « ER WAS MODIFIED 
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TRAP 


Moe 


104456 
001760 
734 


FATFLG sANY FATAL ears 
80% s6R, IF NO ERRORS 
PC,CKDROP iTR ¥ TO DROP THE UNIT 
3<<<4¢¢¢¢¢0¢¢¢¢ END SEGMENT <<<<<<eece““e< 
10001$%: 
TRAP CsESEG 


s4//41441/1/17 END SUBTEST S/////////17/ 
L10076: 
TRAP CsESUB 


TEST 10 SUBTEST 2 


} CHECKS THAT THE MESSAGE BUFFER RELEASE COMMAND WORKS 
tOTT TS SET GN THE COMPUAND PACKET AO TNE. “ERT® BI 
ee SET IN THE CHARACTERISTICS DATA PACKET 
a 
wt 4444444444647 on | tral SAAAAAGAGGGA 
* 3 


TRAP C$BSUB 
PC, TiIORST sSET PACKET TO INITIAL VALUES 
oPRIOO ;LOWER PRIORITY TO ALLOW INTERRUPTS 
MOV @PRIOO RO 


TRAP — C$SPRI 
OTLOPACKET ,R4 :GET THE ADDRESS OF COMMAND PACKET 
$8. , PKBCNT(R4) sSTART WITH MINIMUM ALLOWABLE VALUE 


3>>>>>>>>>>>> BEGIN see >>>>>>>>>>>> 
RAP C#BSEG 


R1 
ERRNO, TLOSSR,PKTSSR 
TRAP C#EROF 
.WORD 1010 
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041232 
041234 


041414 
2706 041416 


043210 
012116 
005237 
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PROTOCOL 


geneeset ; 


2% 
8 


a2 
wn 
= 


o 


SEG 


— 
ERRNO, TLONINT , PKTSSR 


ERRNO, TLONBA ,PKTSSR 


INTRECV 

#025252. T108FR 
#100212 ca ) 

R4, TSDBCRS) 
PRE 

ERRNO, TLOSSR,PKTSSR 


FATFLG 
INTRECV 


ERRNO, TLOINT ,PKTSSR 


TSSRCRS),R1 


sSET FATAL ERROR FLAG 
sLOOP ON ERROR, IF Pins sex 


sBY-PASS SUBTEST IF ——,. oo 


Toro 
s0ID AN INTERRUPT OCCUR ? 
sBRANCH IF YES 


:GET THE CONTENTS OF TSSR 
Br se a tel 

3 

BRANCH NOT INE 

iSET OFF-LINE IN Gece rep DATA 
3sD0ES ag SU MATCH RECEIVED ? 
sOKAY IF MATCH 

sNBA NOT ZERO 


5 
. WORD 
3<<<<eeeeeeKc<e END SEGMENT 666600000008 
* TRAP —- C#ESEG 
3>>>>>>>>>>>> BEGIN oor >>>>>>>>>>>> 
TRAP C#B8SEG 
sCLEAR INTERRUPT RECEIVED FLAG 
iSET COM OUT MESSAGE FER AREA 
oe opness BUF REL 
ia "PO ssh] TO SET 
oar a (GOOD RETURN) 


CAVE. S OF TSSR 
BEVICE FA FATAL SSR PRELED, ie SET 


sSET FATAL ERROR FLAG 
sLOOP ON ERROR, 1F Pon sev 


sO0ID AN INTERRUPT OCCUR ? 
sBRANCH IF YES 


sGET THE CONTENTS OF TSSR 
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2707 041422 000200 MOV @SSR ,R2 sEXPECTED CONTENTS OF TSSR 
2708 041426 000100 IT SET ? 


000100 


SEQ 0161 


60 
ERRNO, TLONNBA,PKTSSR 


013701 : T10BFR,R1 
012702 025252 €025252 ,R2 
020102 

001404 


104456 
001770 


042754 

015554 

001402 sBR 

004737 PC ,CKDROP ;TRY TO DROP THE UNI 


p<eeeeeeeececce END SEGMENT <<ceeeeeeeeec 
00014: 


005737 FATFLG 
80$ 


104405 


TRAP CSESEG 
4444444444644 ~~ a SAAGAAAAAGSAS 
104403 ” TRAP Csesus 


TEST 10 SUBTEST 3 


i CHECKS THAT THE CPU GIVES UP OWNERSHIP OF THE MESSAGE BUFFER 

sAFTER THE MESSAGE BUFFER RELEASE, AND THAT FOLLOWING COMMANDS 

sWORK CORRECTLY 

3 

“ BGNSUB AAAAAAAAAAAA “— eves? SAAAAAAAAAGS 


“"F TRAP = C4BSUB 
PC, TIORST sSET PACKET TO INITIAL VALUES 
#PRIOO ;LOWER PRIORITY TO ALLOW INTERRUPTS 
MOV @PRIOO RO 
TRAP C&SPRI 
sGET THE ADDRESS OF COMMAND PACKET 
sSTART WITH MINIMUM ALLOWABLE VALUE 
3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C$BSEG 


s00 SOFT INIT OF CONTROLLER 


@TLOPACKET ,R4 
08. ,PKBCNT(R4) 
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SEQ 0162 
TEST 10: BASIC PACKET PROTOCOL 
2753 041552 103405 BCS 10$ ;8R IF SOFT INIT = OK 
2757 041554 010001 MOV RO,R1 sSAVE CONTENTS OF TSSR 
2758 041556 ERROF ERRNO, SFIERR,SFIMSG ;DEVICE FATAL ERROR DURING INIT 
041556 1 TRAP C$EROF 
041560 001771 .WORD 1017 
041562 003652 [WORD SFIERR 
041564 012104 “WORD SFIMSG 
2759 041566 005037 002220 10$: CLR FATFLG ;CLEAR FATAL ERROR FLAG 
2760 041572 005037 002222 CLR INTRECV sCLEAR INTERRUPT RECEIVED FLAG 
2761 041576 010465 000000 MOV R4, TSDBCRS) SET THE PACKET ADDRESS 
2762 041602 004737 016416 JSR PC, CHKTSSR sWAIT FOR SSR TO SET 
2763 041606 103407 BCS 153 3BR IF CARRY SET (GOOD RETURN) 
2764 041610 010001 MOV RO,R1 sSAVE CONTENTS OF TSSR 
2768 041612 ERRDF ERRNO, T10SSR,PKTSSR sDEVICE FATAL SSR FAILED TO SET 
041612 1 TRAP C4ERDF 
041614 001772 .WORD 1018 
041616 04321 [WORD T10SSR 
041620 012116 “WORD T 
2769 041622 005237 002220 INC FATFLG ;SET FATAL ERROR FLAG 
2770 041626 15$: CKLOOP LOOP ON ERROR, IF FLAG SET 
041626 104406 TRAP = C$CLP1 
2771 041630 ESCAPE SEG ;BY-PASS SUBTEST IF FATAL ERROR 
041630 104410 TRAP C$ESCAPE 
041632 000056 . WORD 6-, 
2772 041634 005737 002222 TST INTRECV ;DID AN INTERRUPT OCCUR ? 
2773 041640 001004 BNE 22% sBRANCH IF YES 
2777 041642 ERRHRD ERRNO, TIONINT,PKTSSR 
1642 104456 TRAP C4ERHRD 
041644 001773 .WORD 1019 
1646 043277 :WORD T1ONINT 
041650 012116 ; WORD T 
2778 041652 016501 000002 224: MOV TSSRCRS),R1 sGET THE CONTENTS OF TSSR 
2779 041656 012702 MOV OSSR,R2 sEXPECTED CONTENTS OF TSSR 
2780 041662 032701 000100 BIT OOFL .R1 11S OFF-LINE BIT SET ? 
2781 041 001 BEQ 25% sBRANCH IF NOT OFF-LINE 
2782 041670 052702 000100 BIS OOFL ,R2 SET OFF-LINE IN EXPECTED DATA 
2783 041674 020201 25%: CMP R2, Ri sD0ES EXPECTED MATCH RECEIVED ? 
2784 041676 001404 BEQ 303 }OKAY IF MATCH 
041700 ERRHRD ERRNO, T1ONBA,PKTSSR ;NBA NOT 
1700 104456 TRAP  C4ERHRD 
041702 001774 .WORD 1020 
041704 043051 “WORD T1ONBA 
041706 012116 “WORD PKTSSR 
2789 041710 30%: 
27390 083730 36<eeee“eceeece END sree €66666606 00 C" 
041 : 
041710 104405 TRAP CSESEG 
2791 041712 3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
041712 104404 AP =—s-s« C$BSEG 


043506 PC, T1ORST sRESET PACKETS AND 
2793 041720 005037 002222 INTRECV AR 


2794 041724 012737 025252 042672 0025252. T108FR WIPE OUT MESSAGE BUFFER AREA 

2795 041732 012714 100212 #100212, (R4) 3SET COMMAND PACKET TO MESS BUF REL 
2796 041736 010465 000000 R4, TSOBCRS) 1SET ADDRESS 

2797 041742 004737 016416 PC. CHKTSSR sWAIT FOR SSR TO SET 

2798 041746 103407 453 18R IF CARRY SET (GOOD RETURN) 


ShESSS0% : é 


Ss 
RO,R1 sSAVE CONTENTS OF 


H13 


2603 041752 


2606 77 
2807 041774 
6 


013701 
012702 
020102 


001404 


PROTOCOL 


002220 


002222 


042672 
025252 


002220 


4S$: 


52s: 


SS$: 


60$: 


70%: 


75$: 


ERROF 


INC 
CKLOOP 


TST 
BEQ 


ESCAPE 
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ERRNO, T1OSSR ,PKTSSR 
FATFLG 
INTRECV 


ERRNO, TLOINT ,PKTSSR 


TSSRCRS),R1 
»R2 


ERRNO, TLONNBA,PKTSSR 


T1OBFR,R1 
0025252, 
Th 

ERRNO, TLOMBF , EXPREC 


RO,R 
ERRNO, TLOSSR,PKTSSR 


FATFLG 


SEG 


SEQ 0163 
sDEVICE FATAL SSR FAILED TO SET 
TRAP cs 
- WORD 021 
. WORD 10SSR 
-WORD PKTS 
sSET FATAL ERROR FLAG 
sLOOP ON ERROR, IF FLAG ser 
TRAP C$CLP1 
sDID AN INTERRUPT OCCUR ? 
sBRANCH IF NO 
TRAP CS#ERHRD 
-WORD 1022 
«WORD TI1OINT 
.WORD PKT 
sGET THE CONTENTS OF TSSR 
ENTS OF TSSR 


sEXPECTED CONT 

:1S OFF-LINE BIT SET ? 

sBRANCH IF NOT OFF-LINE 

sSET OFF-LINE IN EXPECTED DATA 
{DOES EXPECTED MATCH RECEIVED ? 
;OKAY IF MATCH ‘ 


sNBA NOT SET 
TRAP C#ERHRD 
-WORD 1023 
-WORD T1ONNBA 
-WORD PKTSSR 


sPICK UP THE 1ST WORD OF MESSAGE BUFFER 
Se a EXPECTED DATA 
ANY MESSAGE REC'D 
OK CEQUAL ) 
ee BUFFER WAS wont 


CSERHRD 
-WORD T10OMBF 
-WORD EXPREC 
sLOOP ON ERROR IF FLAG SET 
TRAP CsCLP1 


sCLEAR INTERRUPT RECEIVED FLAG 
AND COMMANDS 


sSA ENTS OF 
sDEVICE FATAL SSR FAILED TO SET 
TRAP CSERDF 

-WORD 1025 
-WORD T10SSR 
-WORD PKTSSR 
sSET FATAL ERROR FLAG 

sLOOP ON ERROR, IF FLAG 4 


RAP CsCLP1 
sBY-PASS SUBTEST IF FATAL ERROR 


1135 
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TEST 10: BASIC PACKET 
042140 104410 
42 000062 


005737 
2850 042150 001006 
016500 


104456 
002002 


2858 042176 
2659 202 


214 104456 
002003 


043210 
012116 


043277 
012116 
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PROTOCOL 


002222 
000002 


000200 
000100 
000100 


002220 
017262 


002222 
043506 


000000 
016416 


002220 


823: 


85$: 


90%: 


95$: 


100$: 


= 


ESCAPE 


INTRECV 
82$ 

TSSRCRS),RO 
ERRNO, TIONINT , PKTSSR 


TSSRCRS),R1 
@SSR ,R2 


OOFL.R1 
85$ 
OOFL ,R2 
R2,Ri 


ERRNO, T1LOSSR,PKTSSR 


TONENT, PKTSSR 


TRAP CSESCAPE 
‘ 10001$-. 
:DID AN INTERRUPT OCCUR ? 
3BR IF YES 
3GET TSSR FOR ERROR REPORT 
TRAP CSERHRD 
‘ 026 
. WORD 1ONINT 
WORD SSR 


sGET THE CONTENTS OF TSSR 
sEXPECTED CONTENTS OF TSSR 
sIS OFF-LINE BIT SET ? 
sBRANCH IF NOT 


OFF -LINE 
iSET OFF-LINE IN EXPECTED DATA 
sDO0ES EXPECTED MATCH RECEIVED ? 
SOKAY IF MATCH 
sNBA NOT ZERO 


TRAP CSERHRD 
«WORD 1027 
- WORD T10SSR 
-WORD PKTSSR 
366646 64<eC"e<< END SEGMENT <<cceeeeeeecc 
10001$: 
TRAP CSESEG 


sANY FATAL ERRORS 
sony IF NO FATAL ERRORS 
Y TO DROP THE UNIT 
36<<€<<¢¢<¢¢¢¢¢¢¢ BGN SEGMENT <<ceeeeeeeeee 
RAP C#BSEG 
sCLEAR INTERRUPT RECEIVED FLAG 
sRESET THE PACKETS AND COMMANDS 
sSET THE PACKET 
;WAIT FOR SSR TO SET 
sBR IF CARRY SET (S009 RETURN) 
sSAVE CONTENTS OF TSSR 
iDEVICE FATAL SSR seme yy, SET 
THORD 
. WORD 
. WORD 
sSET FATAL ERROR FLAG 
sLOOP ON ERROR, IF FLAG 3 


AP 
sBY-PASS SUBTEST IF FATAL ERROR 
TRAP 


;DID AN INTERRUPT OCCUR ? 
;BRANCH IF YE 
:GET TSSR FOR ERROR REPORT 


TRAP CSERHRD 
- WORD 029 

- WORD 1ONINT 
-WORD PKTSSR 


SEQ 0164 
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PROTOCOL 


002220 
017262 


1128: 


125%: 


1308: 


140%: 


30$: 


MOV TSSRCRS),R1 
MOV SSR ,R2 
BIT @OFL ,R1 


BEQ 125$ 

BIS SOF .R2 

CMP 2, Ri 

BEQ ray} 

ERRHRD ERRNO, T1OSSR,PKTSSR 
ENDSEG 

TST FATFLG 

BEQ 140$ 

JSR PC, CKDROP 


TEST 10 SUBTEST 4 
}CHECKS THAT THE REGISTER Pyrite REFUSED (RMR) BIT IN 


sTHE TSSR WILL BE SET IF A 
sBEING EXECUTED AND ANOTHER “ 


JSR PC, TIORT2 
JSR PC. TIORST 
SETPRI #PRIOO 


Mov sr eeet ks R4 
MOV OOKBENT (RA 


MOV $8: * PRBCNTCAS3 


JSR PC, SOFINIT 
103 


RO,R1 
ERRNO, SFIERR, SFIMSG 


;GET THE CONTENTS OF TSSR 

sEXPECTED CONTENTS OF TSSR 

31S OFF-LINE BIT SET ? 

sBRANCH IF NOT OFF-LINE 

ISET OFF-LINE mm. OoecTeD DATA 

3sD0E owe ED MATCH RECEIVED ? 

OKAY IF MA 

;NBA NOT PERO 
TRAP CSERHRD 
-WORD 1030 
.WORD T10OSSR 
WORD PKTSSR 

RSS SSS SSE SE SS | END SEGHENT (SSS ESSEC SSS So 
TRAP CSESEG 

eT NO poll FLAG FOR SET 

3 


IF NOT SET (OK) 
sDROP DEVICE IF INDICATED 
s////41//11/7/7 END SUBTEST S/////////7/7/ 
L10100: 
TRAP CSESUB 


TE CHARACTERISTICS COMMAND 
“ COMMAND 


IS ATTEMPTED 


YT LLLAALLLL BEGIN SUBTEST SUMEEAASASSA 
*"" TRAP cCsBSuUB 


sSET SECOND PACKET UP 
sSET PACKET TO INITIAL VALUES 
SLOWER PRIORITY TO ALLOW oe 


TRAP 
sGET Ly. | ADDRESS OF COMMAND oat 
sGET THE ADDRESS 2ND CMD P 
sSTART WITH MINIMUM ALLOWABLE VALUE 
sSTART WITH MINIMUM ALLOWABLE VALUE 


3>>>>>>>>>>>> BEGIN =o. >>>>>>>>>>>> 
C$BSEG 


s00 SOFT INIT OF CONTROLLER 

sBR IF SOFT INIT = 

sSAVE CONTENTS OF TSSR 

sDEVICE FATAL ERROR ORI INIT 


SEQ 0165 


K13 
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SEQ 0166 
TEST 10: BASIC PACKET PROTOCOL 


2940 042474 005037 002220 10$: CLR FATFLG sCLEAR FATAL ERROR FLAG 
2941 042500 005037 002222 CLR INTRECV sCLEAR INTERRUPT RECEIVED FLAG 
042504 010465 000000 MOV R4, TSDBCRS) sSET THE PACKET ADDRESS 
294 oasais nett? rspess4 7 Ms Na 3 athe ofc to ae 
0425 004 8 
2945S 042520 016501 000002 MOV TSSR(RS),R1 sGET CONTENTS OF FESR REGISTER 
032701 000200 BIT @SSR,R1 sCHECK FOR SSR (TSSR) SET 
2947 042530 001006 BNE 15% 3sBR, IF SSR SET (GOOD) 
2951 042532 ERRDOF ERRNO, T10SSR,PKTSSR sDEVICE FATAL SSR FAILED TO SET 
042532 1 CSEROF 
042534 002010 1032 
042536 0432 WORD T10SSR 
042540 012116 ‘ PKTSSR 
2952 042542 005237 002220 INC FATFLG sSET FATAL ERROR FLAG 
2953 042546 15$: CKLOOP sLOOP ON ERROR, IF FLAG SET 
042546 104406 TRAP CS$CLP1 
2954 042550 ESCAPE SEG 3BY-PASS SUBTEST IF FATAL ERROR 
042550 104410 TRAP CSESCAPE 
042552 000056 ‘ $- 
2955 005737 002222 TST INTRECV sDID AN INTERRUPT OCCUR ? 
$228 001004 BNE 22% sBRANCH IF YES 
2958 
2962 042562 ERRHRD ERRNO, TIONINT,PKTSSR 
042562 104456 TRAP C#ERHRD 
042564 11 «WORD 1033 
042566 043277 -WORD TIONINT 
042570 012116 . WORD 
2963 042572 016501 000002 22%: MOV TSSRCRS),.R1 sGET THE CONTENTS OF TSSR 
2964 042576 012702 110200 MOV @SSRIRMR!ISC ,R2 sEXPECTED CONTENTS OF TSSR 
2965 042602 032701 000100 BIT OOFL ,R1 sIS OFF-LINE BIT SET ? 
2966 042606 001402 BEQ 25% sBRANCH IF NOT OFF-LINE 
2967 042610 052702 000100 BIS GOFL ,R2 sSET OFF-LINE IN EXPECTED DATA 
2968 042614 020201 25%: CMP R2,Ri sD0ES EXPECTED MATCH RECEIVED ? 
2969 042616 001404 BEQ 303 sOKAY IF MATCH 
2973 042620 ERRHRD ERRNO, T1OSSR,PKTSSR sNBA NOT ZERO 
042620 104456 TRAP C$ERHRD 
042622 00201 -WORD 1034 
042624 043210 -WORD T10SSR 
042626 012116 -WORD PKTSSR 
2974 042630 30%: 
2975 042630 ENDSEG 3<<<¢<¢<¢¢¢¢¢¢¢<¢¢ END SEGMENT <<ceeeeeeeeece 
042630 100008: 
042630 104405 TRAP CSESEG 
2976 042632 ENDSUB s4//141411/47 END SUBTEST S//////4////147 
042632 L10101: 
042632 104403 TRAP CsESuB 
2977 042634 EXIT TST sALL DONE WITH THIS TEST 
042634 104432 TRAP CsEXxIT 
000774 -WORD 1L10075-. 
2978 
2979 3° 
2980 sLOCAL STORAGE FOR THIS TEST 
2981 s- 
2982 


2984 042640 -BLKB 10-<.-TSV2E7> 
2986 042650 TLOPACKET; sCOMMAND PACKET FOR TEST 


Lis 
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2987 042650 100204 : 100204 ;WRITE CHAR COMMAND 
s3ee Suse oeeees 042660 WORD sADDRESS OF COARACTERTST ICS E OCK 


000000 . 
soe 042656 . sSTARTING VALUE OF BLOCK SIZE 


5992 042660 sCHARACTERISTICS DATA BLOCK 
. sADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 


SEQ 0167 


T10BFR: .BLKW }MESSAGE BUFFER 

3° 

TEST DATA FOR SUBTEST FOUR 

410PKT: ;COMMAND PACKET FOR TEST 

WORD IWRITE CHAR COMMAND, WITH IE, ACK 

sADDRESS OF CHARACTERISTICS BLOCK 
;STARTING VALUE OF BLOCK SIZE 
:CHARACTERISTICS DATA BLOCK 
}ADORESS OF MESSAGE BUFFER 

LENGTH OF MESSAGE BUFFER 


TLOBUFR: . . sMESSAGE BUFFER 


LOCAL TEXT MESSAGES FOR TEST 
ge 


TIOMBF: .ASCIZ ' Buffer Modified efter MESSAGE BUFFER RELEASE Command’ 
TIONBA: .ASCIZ Not Clear” y WRITE pty a Se aagnnene 


TiossR; ASCIZ 
TIONINT: * 


of TSSR TI 
‘Expected Interrupt Not Received On WRITE CHARACTERISTICS’ 
TIOINT: .ASCIZ rexpectes Interrupt Received On WRITE CHARACTERISTICS’ 
10ID: ASer 


TST ‘Besic Packet Protocol’ 


t iad 


; ROUTINE TO RESTORE COMMAND PACKET TO START-UP (DEFAULT) VALUES 
‘ 
t- 


TIORST 
, SAVE THE REGISTERS 

012701 042650 MOV @TIOPACKET,R1 «| START OF THE PACKET 

012721 100204 MOY «100208 CRID: © SURITE CHARACTERISTICS WITH ACK, IE 





M135 
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Sheret 042660 MOV OTLODATA,(R1)- oRoone ss OF CHAR DATA BLOCK 
1 CR1)- sEXTENDED 
:SIZE OF en BLOCK IN BYTES 
sADDRESS OF MESSAGE BUFFER 


000010 MOV 68. ,(R1)- 
042672 MOV eTiOBFR,CR)~ 
000016 MOV 4 sLENGTH OF MESSAGE BUFFER 


042672 CL pe sCLEAR 1ST LOC IN MESSAGE BUFFER 
sRETURN 
3° 
} ROUTINE TO RESTORE COMMAND PACKET #2 TO START-UP (DEFAULT) VALUES 
5 
t- 


TIORT2: 
sSAVE_THE REGISTERS 
@T1OPKT, 7 iSTART OF THE PACKET 
#100204 ,(R1)- WRITE gg ha ty WITH ACK, IE 
@TIODTA,(R1)- SADORESS OF CHAR DATA BLOCK 
sete sEXTENDED ADDRESS 
iSIZE OF DATA BLOCK IN BYTES 
etideurR R.(R1)- sADDORESS OF MESSAGE BUFFER 
sLENGTH OF MESSAGE BUFFER 


sCLEAR 1ST LOC IN MESSAGE BUFFER 
sRETURN 


L10075: 
TRAP 


-SBTTL TEST 11: NON-TAPE MOTION COMMANDS 
| hd 


i THIS TEST VERIFIES PROPER OPERATION OF THE INITIALIZE 
sCOMMAND. TWO ASTESTS ARE THE FIRST venir ie THAT 
The ree RUNS _T < VALID 

; VALUES IN THE COMMAND MODE FIELD CAUSES COMMAND REJECT. 
3 

t- 


BGNTST ads 
MOV eTST1110 RO }ASCII MESSAGE TO IDENTIFY TEST 
JSR PC, TSTSETUP 100 INITIAL TEST SETUP 
ing $20. , LOOPCNT sPERFORM 20 ITERATIONS 
* BGNSUB 3/////4/4/444 BEGIN poe SAAAAAGAGAGG 
eis Csesue 


SETPRI #PRIOO sLOWER PRIORITY TO ALLOW INTERRUPTS 
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000000 

016054 


i OATAL 


sWRITE Gemac rents ies PACKET 
sISSUE WRITE Lee Np ae Ics 


}WRITE CHARACTERISTISC FAILED 


sSET UP PACKET FOR COMMAND 
sGET THE ADDRESS OF COMMAND PACKET 


3>>>>>>>>>>>> BEGIN eet, >>>>>>>>>>>> 
C#BSEG 


sCLEAR FATAL ERROR FLAG 
CLEAR ERRUPT RECEIVED FLAG 
sSET_ THE ADORESS 


sSET FATAL ERROR FLAG 
sLOOP ON ERROR, IF FLAG 


sBY-PASS SUBTEST IF FAT 


oS ae can 2 


SEQ 0169 





Bi4 
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3150 044050 ERRHRD ERRNO, T1LINBA,PKTSSR 
11 


;CHECK RAM TO MEMORY 
sRAM OK GO ON 
sTHEY DON’T MATCH 


° RAMERR 
3<<<<<¢0¢¢¢¢¢¢ END SEGMENT <<<eeeeeeeeee 
100004: 

TRAP CSESEG 


sNANANANNANAAN END SUBTEST NANANAANANANS 
10103: 


TRAP CsESUB 
sANY FATAL ERRORS ? 


BRANCH IF NOT 


i PC, CKDROP ‘TRY TO DROP THE UNIT 
8 


3° 
TEST 11, SUBTEST 2 


i CHECK THAT NON-ZERO MODE BITS BEING SET CAUSES 
sINITIALIZE COMMAND TO BE REJECTED 


3 
ad 
ALLL LLL “i SUBTEST S///////14447 
+2: 


TRAP C#B8SUB 
sLOWER PRIORITY TO ALLOW INTERRUPTS 


MOV @PRIOO, 
TRAP Cs#SPRI 

3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
TRAP C&BSEG 


3190 044146 
3191 044146 012704 045070 OT11PK2,R4 sWRITE CHARACTERISTICS PACKET 
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TEST 11: NON-TAPE MOTION COMMANDS 
044152 


3192 


004737 
103404 


010662 


JSR 
BCS 


— 
ERRNO , WRTMSG , SF IMSG 


PC, TIIREST 
OTLIPACKET ,R4 


INTRECV 

oP . MODE . (R4) 

R4, TSOBCRS) 
CHKTSSR 


iS 
ERRNO, T11SSR,PKTSSR 


SEG 


+4 RECV 
ERRNO, TLININT ,PKTSSR 


o2c Son! TSREU,R2 
OOF L RI 


OOFL ,R2 
R2,Ri 


ERRNO, T112REJ,PKTSSR 


<4 oo 
ERRNO, PKTRAM, RAMERR 


sISSUE WRITE CHARACTERISTICS 
, COMMAND OK 

;WRITE CHARACTERISTISC FAILED 
. WORD 
WORD 


sSET UP PACKET FOR COMMAND 
sGET THE ADDRESS OF COMMAND PACKET 


CLEAR INTERRUPT RECEIVED FLAG 
IRON ZERO COMMAND FODE BITS 


s6R IF 
iSAVE CONTENTS OF TSSR 
sDEVICE FATAL SSR ened we SET 


. WORD 
sLOOP ON ERROR, IF FLAG Tite 
sBY-PASS CHECKS IF FATAL ERROR 

TRAP 


;01D AN INTERRUPT OCCUR ? 
sBRANCH IF YES 


TRAP 


a RAM TO MEMORY 
ees GO ON 
3s THEY DON’T MATCH 


g<<eeeeeeceecec<e END SEGMENT <<ceeeeeeeeece 
100008: 
TRAP CSESEG 


SEQ 0171 





D1i4 
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TEST 11: NON-TAPE MOTION COMMANDS 


59%: ENDSUB s\\\NAANAANANANN END SUBTEST NANNANANANANN 
044336 110104: 
044336 104403 TRAP = C#ESUB 
3241 
t¢ 
- a 
$344 sTEST 11, SUBTEST 3 
324 3 
3346 ;CHECK THAT THE GET STATUS COMMAND IS ACCEPTED 
$ 
$33 — 
044340 BGNSUB 34/////////// BEGIN SUBTEST S///////////7/ 
044340 711.3: 
044340 104402 CsesuB 
3252 geasae SETPRI #PRIOO ;LOWER PRIORITY TO ALLOW INTERRUPTS 
012700 000000 nov @PRIOO,RO 
044 104441 TRAP §C$SPRI 
3253 044350 BGNSEG 3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
3254 preted aeers? 016054 JSR PC, SOFINIT E CONTROLLER. _— 
3555 044356 103405 BCS 3§ : ibe iP Sort 
3259 044360 010001 MOV RO,R1 ENTS OF T 
3260 044362 ERROF ERRNO, SFIERR,SFIMSG SEVECE FA FATAL ERROR OURING NIT 
362 104455 TRAP CSEROF 
044364 902133 \ .WORD 1113 
044366 003652 “WORD SFIERR 
044370 012104 [WORD SFIMSG 
3261 044372 3$: 
3262 044372 012704 045070 MOV $T11PK2,R4 sWRITE CHARACTERISTICS PACKET 
3263 044376 004737 010662 JSR PC, WRTCHR sISSUE WRITE CHARACTERISTICS 
3264 044402 103404 BCS 4 ;0R, IF C I 
3268 044404 ERRHRD ERRNO, WRTMSG, SFIMSG ;WRITE CHARACTERISTISC FAILED 
044404 104456 TRAP § CSERHRD 
044406 002132 .WORD 1114 
044410 005056 - WORD WRTMSG 
044412 012104 é SF IMSG 
3390 044434 004737 045674 ~ JSR T11REST SET UP PACKET FOR COMMAND 
i 
$271 gaaazo 012704 045020 ae MOV OTLIPACKET RA :GET THE ADORESS OF COMMAND PACKET 
3 
3273 044424 005037 002222 108: CLR INTRECV sCLEAR INTERRUPT RECEIVED FLAG 
$375 gaaa3s One7S? Ohoeie Pe CharscR: VEIT FOR Sam 0 cere 
$ 
76 044440 103405 Bee "53 1BR IF’ Cana SET (e000 RETURN) 
044442 010001 MOV RO,R1 SAVE CONTENTS 
3281 044444 ERRDF  ERRNO,T11SR2,PKTSSR DEVICE FATAL SSR FAILED TO SET 
044444 104455 TRAP CSEROF 
044446 002133 .WORD 1115 
044450 045440 “WORD T115R2 
04445e 012116 “WORD  PKTSSR 
3282 0444 15$: CKLOOP sLOOP ON ERROR, IF FLAG SET 
044454 104406 TRAP = C$CLP1 
3283 044456 ESCAPE SEG :8Y-PASS SUBTEST IF FATAL ERROR 
044456 104410 TRAP C#ESCAPE 


E14 
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SEQ 0173 
TEST 11: NON-TAPE MOTION COMMANDS 
044460 74 -WORD 10000$-. 
3284 044462 37 002222 TST INTRECV 3DID AN INTERRUPT OCCUR ? 
3285 044466 001004 BNE 22% sBRANCH IF YES 
3289 044470 ERRHRD ERRNO, TIININT,PKTSSR 
ened | 104456 TRAP ieee 
044474 045514 - WORD FLININT 
944500 oresor 000002 22$ MOV TSSRCRS),R1 Te eteuis oF 
5 044510 033701 000100 BIT SOFL RL 11S TS OFF. LINE BIT hs 
o 3 
3293 044514 001402 BEQ 25% sBRANCH “i NOT TSE he 
3294 044516 052702 000100 BIS OOFL ,R2 iSET OFF -L IN TED DATA 
044 1 25$: CMP R2,Ri sDOES EXPE TED MATCH RECEIVED ? 
044524 001404 BEQ sOKAY IF MATCH 
3300 044526 ERRHRD ERRNO, T113REJ,PKTSSR ry NOT ACCEPTED 
044 104456 TRAP CSERHRD 
044530 002135 4 1117 
044 04525. atone” 
O44 012116 ~ WORD 
3301 044536 30%: 
se08 044536 004737 011154 35%: JSR PC ,CKRAM sCHECK RAM TO MEMORY 
3303 044542 103405 BCS 593 ;RAM OK GO ON 
3307 044544 ERRHRD ERRNO,PKTRAM,RAMERR 3 THEY DON’T MATCH 
044544 104456 TRAP CSERHRD 
044546 002136 . WORD Pra 
SSO 004745 . WORD RAM 
044552 015570 . WORD 
3308 044554 ENDSEG 3<<6€¢¢000000¢ END SEGMENT po. PR eo 
044554 10000$: 
044554 104405 TRAP CsESEG 
3310 
3311 044556 59%: ENDSUB s\\NNANANAANNN END SUBTEST N\ANAAAAAAAANA 
044556 L10105: 
044556 104403 TRAP CsESUB 
3312 . 
3313 3° 
3314 3 
sei3 sTEST 11, SUBTEST 4 
’ 
3317 s;SUBTEST TO VERIFY THAT A GET STATUS COMMAND IS 
$338 sREJECTED IF A NON-ZERO COMMAND MODE FIELD IS USED 
5 
oeaseo 444444444444 oar 3 SUBTEST /////////447/ 
oO 4: 
044560 104402 TRAP CsBSuUB 
3324 044562 SETPRI #PRIOO sLOWER PRIORITY TO ALLOW INTERRUPTS 
044562 012700 000000 MOV @PRIOO RO 
044566 104441 TRAP CsSPRI 
3325 044570 BGNSEG 3>>>>>>>>>>>> BEGIN SEGMENT >>>>>>>>>>>> 
044570 104404 TRAP C#BSEG 
044572 004737 016054 JSR PC ,.SOFINIT 300 SOFT INIT OF CONTROLLER 


3326 
3327 044576 103405 BCS 3% s8R IF SOFT INIT = OK 


Fi4 
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TEST 11: NON-TAPE MOTION COMMANDS 
3331 044600 010001 
3332 044602 

$0218? 

003652 

012104 

012704 

004737 

103404 

104456 


044580 005096 


045070 
010662 


045674 
045020 
002222 
007000 


000000 
016416 


002222 


100206 
000100 
000100 


3375 
3376 044762 011154 


34%: 


4$: 


5$: 
10%: 


15%: 


22%: 


25%: 


30%: 
35%: 


BCS 


RO,R1 
ERRNO, SFIERR , SFIMSG 


$T11PK2,R4 
PC ,,WRTCHR 


$ 
ERRNO , WRTMSG , SF IMSG 


PC, T11REST 
OT11IPACKET ,R4 


INTRECV 
$007000 cna) 
R4,TSDBCRS 

PC’ CHKT Ssh 
153 


RO,R1 
ERRNO, T11SR2,PKTSSR 


gsecy 
ERRNO, TLININT ,PKTSSR 


PC,CKRAM 


SAVE CONTENTS OF TSSR 
{DEVICE FATAL ERROR DURING _pNtT 
CSEROF 
jf 1119 
[WORD SFIERR 
[WORD SFIMSG 
;WRITE CHARACTERISTI 
1 JSSUE_WR E  GHARAGTERISTICS 4 
TF COPEAND ISSUED 
erite CHARACTERISTISC PATLED 
C4ERHRD 
> WORD MSG 
;SET UP PACKET FOR COMMAND 
:GET THE ADDRESS OF COMMAND PACKET 
sCLEAR INTERRUPT RECEIVED FLAG 
3SET TO NON-ZERO MODE 
SET P 
;WAIT FOR SSR 
3BR IF CARRY SET (GOOD RETURN) 
sSAVE CONTENTS OF T 
;DEVICE FATAL SSR FAILED TO SET 
TRAP  CSEROF 
.WORD 1121 
‘WORD T11SR2 
“WORD PKTSSR 
sLOOP ON ERROR, IF FLAG SET 
TRAP  CS$CLP1 
;BY-PASS SUBTEST IF FATAL ERROR 
TRAP CS$ESCAPE 
. L10106-. 
3DID AN INTERRUPT OCCUR ? 
;BRANCH IF YES 
TRAP $C$ERHRD 
.WORD 1122 
"WORD  TLININT 
aa eek eae gga” PKTSSR 
t 
sEXPECTED CONTENTS OF 
31S OFF-LINE err 
sBRANCH IF NO OFF. INE 
sSET OFF-LINe IN EXPECTED DATA 
DOES EXPECTED MATCH RECEIVED 
;OKAY IF MAT 
sCOMMAND NOT REJECTED 
TRAP  CSERHRD 
.WORD 1123 
[WORD T114REU 
WORD SSR 


3CHECK RAM TO MEMORY 


SEQ 0174 


G14 
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TEST 11: NON-TAPE MOTION COMMANDS 
103404 
104456 
ooeice 
004745 
015570 


104405 


104403 


59% 
ERRNO , PKTRAM, RAMERR 


TST 


}LOCAL STORAGE FOR THIS TEST 
ge 


. 10-<.-TSV2E7> 
T1LIPACKET: 


100204 
,eaee 


T11DATA: 


553 885 5 


T11D0TA: 


2 ee 


T116Fe: 


{LOCAL TEXT MESSAGES FOR TEST 


3<<<¢¢¢¢¢¢00¢¢ END SEGMENT <ccceeeeeece 
10000$ : 


* ‘TRAP CSESEG 
sN\\NAANANANNAN END SUBTEST \ANANANAANANA 
L10106: 

TRAP Cs€SUB 
sALL DONE THIS TEST 


TRAP CsExIT 
-WORD L10102-. 


:COMMAND PACKET FOR TEST 
;WRITE CHAR COMMAND, WITH IE, ACK 
sADDRESS OF CHARACTERISTICS BLOCK 
;STARTING VALUE OF BLOCK SIZE 


sCHARACTERISTICS DATA BLOCK 
sADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 


sMESSAGE BUFFER 


:COMMAND PACKET FOR TEST 
;WRITE CHAR COMMAND, WITH IE, ACK 
sADDRESS OF CHARACTERISTICS BLOCK 
sSTARTING VALUE OF BLOCK SIZE 


sCHARACTERISTICS DATA BLOCK 
sADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 


sMESSAGE BUFFER 





H14 
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TEST 11: NON-TAPE MOTION COMMANDS 


ue 045132 


Saas 3s Sasee8 
3436 045303 
3437 045364 


3438 045440 
3439 045514 
3440 045572 


012701 
012721 


012701 
012721 


045020 
100213 


045042 


045020 
100217 


045042 


3 - 
T1INBA: .ASCIZ 


11TSBA: 
TST1i1ID: 


3° 


10:28 Page 85-70 


‘INITIALIZE 
“ASEtS 


.ASCIZ 


Command Not Accepted’ 
eet tantce noe Re jected With Non-Zero Mode Field’ 


"GET STATUS Not Re jocved With Non-Zero Mode Field’ 
‘Contents of TSSR Incorrect After t 


NITIALIZE’ 


'Kertente of TSSR Incorrect areen GET STATUS’ 


eens ee Not Received On INITIALIZE’ 


ASCIZ ‘Non-Tape Motion 


INE TO RESTORE COMMAND PACKET TO START-UP (DEFAULT) VALUES 


}ROUT 
HINITIALIZE C 
a 

3 — 


T1IREST: 


| ad 


#T11PACKET ,R1 
ease: C(R1)- 


o 
DDD 
eyereres 

J 

e¢ 


o 


SRAAAAOAALBEA 


sSAVE_THE i ae ha 
THE PACKET 


START OF 
}INITIALIZE WITH ACK 
sADDRESS OF CHAR DATA or 


1EXT ENDED ADDRESS 
sSIZE OF DATA BLOCK IN BYTES 
sADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 


sCLEAR 1ST LOC IN MESSAGE BUFFER 
sRETURN 


INE_TO RESTORE COMMAND PACKET TO START-UP (DEFAULT) VALUES 


6 

sROUT 

iGET STATUS C 
s 

ge 


TIIRT2: 
VREG 


@T1IPACKET 


R1 
#100217, (Ri) 


sSAVE_THE eegisiens 
THE PACKET 


I START OF 
;GET STATUS WITH ACK 
sADDRESS OF CHAR DA DATA oF Bock 


VEX TENDED ADDRESS 
sSIZE OF DATA BLOCK IN BYTES 
sADDRESS OF MESSAGE BUFFER 


sLENGTH OF MESSAGE BUFFER 


sCLEAR 1ST LOC IN MESSAGE BUFFER 
sRETURN 


SEQ 0176 


114 


TSVSA - HARDWARE TESTS MACRO VOS.03 Tuesday 28-Apr-87 10:28 Page 85-71 


SEQ 0177 
TEST 11: NON-TAPE MOTION COMMANDS 


046000 L10102: 
046000 104401 TRAP CSETST 


3488 046002 ENDMOD 


J14 
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TEST 11: NON-TAPE MOTION COMMANDS 


046002 
046002 


000010 


000031 
046024 
160010 
177776 


001031 
046060 
000000 
000776 

104 


111 
111 


105 
116 
116 


126 
124 
124 


- TITLE 


BGNMOD 
TSV6:: 


10:28 Page 86 


TSV6 - PARAMETER CODING 


TSV6 


-SBTTL HARDWARE PARAMETER CODING SECTION 


‘* 
’ THE HAROWARE or ee CODING SECTION CONTAINS 


THAT ARE USED BY 


MACROS ARE NO 
MACROS ALLOW 


7 HE SUPERVISOR TO BUILD 


MACROS 
etl igs F THE 


THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 


‘ 

; EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
s INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
; 

: 


BGNHRD 
-WORD L 


evinstdiiai] 


-EVEN 


10107-L $HARD/2 


HPM1,0,0,160010,177776, YES 
T$COOE 


-0,340,0,7, YES 


‘DEVICE py vceton CTSBA/TSOB) ' 


‘ INTERRUPT 
"INTERRUPT PRIORITY . 


sGET TSBA/TSDB REGISTER ADDRESS. 


sGET VECTOR ADDRESS. 


sGET INTERRUPT PRIORITY. 


SEQ 0178 


K14 
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SOFTWARE PARAMETER CODING SECTION 


-SBTTL SOFTWARE PARAMETER CODING SECTION 


id 

: THE SOFTWARE PARAMETER CODING et 1 AINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 


BGNSF T 
-WORD L10110-L$SOFT/2 


SPM1,0,-1, YES GET TRANSPORT TEST FLAG. 
YES GET ITERATION CONTROL. 


L$SOFT:: 
F 


: c D.7777,0,7777, YES GET LOCAL ERROR LIMIT 
: 0:7777.0.7777.YES GET GLOBAL ERROR LIMIT 
110110: © 

SPM1:  . ENABLE TRANSPORT TESTS 

SPM4; ° 


SPM6 
SPM7: 


; FINALLY A GENEROUS PATCH AREA. 
ADJUSTMENT TO ACCOUNT FOR THE “LASTAD BIT7" HACK 


s AND AN 
; DESCRIBED IN “SUPPRG.MEM” (FOR REV C). 
: 


PATCH: : 


sSET LAST USED ADORESS. 


LSLAST::— 





L14 
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Symbol teble 
012176 € 


BR 
22°, 
a. 


S 
000010 
000003 
003156 G 
015760 G 
002230 G 


ae 


aepees 
#220 
b 


ze 
ae 


aS 


agies. 
epeaheraags 
gener 


2: t 
a ss 


PEP ASF MHA MREK RMN MRO OMS 


ee 
3 
iis 


ff 


Laon an na ee Ln Le Le Le Lee eee ae Len Lee Lee Le Ln 


?% : 
PCR RKBBVOBVSCCSVSCRVeSOOS 


: 
asst 


ie 


G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 
G 


S SI ARsreeeHoMMA acne aaIoe SsROPPP PRR SSE 
xwmn 
eeeuan 


OMMIONNONOANNOONNNONONANNANONNOHNQAHNHOHNHNHQHANHNHOHHNAAAHOHOHAHAAHAHOOHAANOANNANAN 


3 
z 
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r 


ge aR ies se geared eee 8S 


BEE 


: 


wn 
«4 
QB 


ge 


Pe EE OD 
=< 
ag 


L 
u 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 
L 


e 


e8 


B88 
uae 


ERSRRS 
er 


E 


037126 
037332 
043632 
041122 
041514 
042404 


000002 
012214 G 
013134 G 


012420 G 
014012 G 
000006 


ZBEBPEPERE: 
SagnRaaS 


5 
r 


ispabscochch bata 


D VVVVVVVVVVVVUVVUUY 
no-4 


ie 





N14 


TSV6 - PARAMETER CODING MACRO VOS.03 Tuesday 28-Apr-87 
Symbol teble 


~ 
° 
& 
i 
s 
iv] 


TSTSID 


8 
a] 


oe 


CORERERELES 
AAAAAANG 


ae 
oF 
iu elilie. 


& 
et 


Re 


i 
: 


nS 


she 
0036Se2 
012104 G 
002164 G 
003154 G 
012036 
003400 
016054 
010466 
aa 
046174 


a+ 
oF 
on 
~ 


u 
seinen gE: 


R= 


2304 


o 


CEE 


peee 


nie 


ve ane 


asa sal i i i i i a a a ad a a hh td ht tt dt tt tt St Ht 
PRADO AOA HHAMHSRHHSMSREHMRER HEE 


AAAs ttt aa 
ore 
Rake 


it) 
é 
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Badges aay’ 


$5 


eee senses 


ag 


SEKEKUAAAAAAAONONONS 
¢ 


3 


CRW 
(RW 
CRW 


113 Pages) 
19684 Words Pogee) 
RSX-11M/PLUS (Under VAX/VMS) 


:04:47.69 
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